diff options
author | Nick Barnes <nick@tarides.com> | 2023-05-02 21:16:12 +0100 |
---|---|---|
committer | Nick Barnes <nick@tarides.com> | 2023-05-02 21:16:12 +0100 |
commit | d3a5c923939a1fc03cc14c005d61210d8c3bd546 (patch) | |
tree | 5459de2b7b6cbaa1167d18224f1ea5d256e2f3f7 /runtime/obj.c | |
parent | ad111da274b58d82249f92b8c79ee252bf25525b (diff) | |
parent | 23dab79a4e42856aa33816b9c79c3d4d79959cb9 (diff) | |
download | ocaml-d3a5c923939a1fc03cc14c005d61210d8c3bd546.tar.gz |
Merge branch 'trunk' into nick-get-copy
Diffstat (limited to 'runtime/obj.c')
-rw-r--r-- | runtime/obj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/runtime/obj.c b/runtime/obj.c index cdaa4c1766..56db69f5fa 100644 --- a/runtime/obj.c +++ b/runtime/obj.c @@ -44,7 +44,7 @@ static int obj_tag (value arg) /* The acquire load ensures that reading the field of a Forward_tag block in stdlib/camlinternalLazy.ml:force_gen has the necessary synchronization. */ - hd = (header_t)atomic_load_acq(Hp_atomic_val(arg)); + hd = (header_t)atomic_load_acquire(Hp_atomic_val(arg)); return Tag_hd(hd); } } |