summaryrefslogtreecommitdiffstats
path: root/byterun/weak.c
diff options
context:
space:
mode:
Diffstat (limited to 'byterun/weak.c')
-rw-r--r--byterun/weak.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/byterun/weak.c b/byterun/weak.c
index 01a35ec89..1f121af3a 100644
--- a/byterun/weak.c
+++ b/byterun/weak.c
@@ -114,7 +114,7 @@ CAMLprim value caml_weak_get_copy (value ar, value n)
v = Field (ar, offset);
if (v == caml_weak_none) CAMLreturn (None_val);
- if (Is_block (v) && (Is_young (v) || Is_in_heap (v))){
+ if (Is_block (v) && Is_in_heap_or_young(v)) {
elt = caml_alloc (Wosize_val (v), Tag_val (v));
/* The GC may erase or move v during this call to caml_alloc. */
v = Field (ar, offset);