summaryrefslogtreecommitdiff
path: root/erts/emulator/beam/erl_bif_binary.c
diff options
context:
space:
mode:
authorPatrik Nyblom <pan@erlang.org>2010-08-30 14:43:00 +0200
committerPatrik Nyblom <pan@erlang.org>2010-08-30 14:43:00 +0200
commit2b2b92774d47c8b51cc25bb8bc1d7b4e356936d7 (patch)
tree0c063cafef84bb187b9b860d9d972f2312c1824b /erts/emulator/beam/erl_bif_binary.c
parentec15e459e53ed4f9a74336513357702b1be446ec (diff)
parentd36f3b0ab48aced7668974530549004b4f16075f (diff)
downloaderlang-2b2b92774d47c8b51cc25bb8bc1d7b4e356936d7.tar.gz
Merge branch 'pan/ets_binary_overhead/OTP-8762' into dev
* pan/ets_binary_overhead/OTP-8762: Remove binary overhead counter from ets objects
Diffstat (limited to 'erts/emulator/beam/erl_bif_binary.c')
-rw-r--r--erts/emulator/beam/erl_bif_binary.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/erts/emulator/beam/erl_bif_binary.c b/erts/emulator/beam/erl_bif_binary.c
index 59fce04343..024ff2a684 100644
--- a/erts/emulator/beam/erl_bif_binary.c
+++ b/erts/emulator/beam/erl_bif_binary.c
@@ -2551,7 +2551,8 @@ BIF_RETTYPE binary_referenced_byte_size_1(BIF_ALIST_1)
}
pb = (ProcBin *) binary_val(bin);
if (pb->thing_word == HEADER_PROC_BIN) {
- res = erts_make_integer((Uint) pb->val->orig_size, BIF_P); /* XXX:PaN Halfword? orig_size is a long */
+ /* XXX:PaN - Halfword - orig_size is a long, we should handle that */
+ res = erts_make_integer((Uint) pb->val->orig_size, BIF_P);
} else { /* heap binary */
res = erts_make_integer((Uint) ((ErlHeapBin *) pb)->size, BIF_P);
}