diff options
Diffstat (limited to 'byterun/weak.c')
-rw-r--r-- | byterun/weak.c | 2 |
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); |