File 0251-erts-Fix-binary-referenced_bytes_size-for-heap-binar.patch of Package erlang

From a4fd35a718d37a95ddbfbe394635e582543ae84d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lukas=20Backstr=C3=B6m?= <lukas@erlang.org>
Date: Wed, 29 Jan 2025 16:43:21 +0100
Subject: [PATCH 5/6] erts: Fix binary:referenced_bytes_size for heap binaries

---
 erts/emulator/beam/erl_bif_binary.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/erts/emulator/beam/erl_bif_binary.c b/erts/emulator/beam/erl_bif_binary.c
index 2b7e007822..5abf5bf0f1 100644
--- a/erts/emulator/beam/erl_bif_binary.c
+++ b/erts/emulator/beam/erl_bif_binary.c
@@ -2524,6 +2524,8 @@ BIF_RETTYPE binary_referenced_byte_size_1(BIF_ALIST_1)
 
     if (br != NULL) {
         size = (br->val)->orig_size;
+    } else {
+        size = BYTE_SIZE(size);
     }
 
     BIF_RET(erts_make_integer(size, BIF_P));
-- 
2.43.0

openSUSE Build Service is sponsored by