summaryrefslogtreecommitdiff
path: root/runtime/fiber.c
diff options
context:
space:
mode:
Diffstat (limited to 'runtime/fiber.c')
-rw-r--r--runtime/fiber.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/runtime/fiber.c b/runtime/fiber.c
index 52d68fbbff..d86daf9141 100644
--- a/runtime/fiber.c
+++ b/runtime/fiber.c
@@ -670,14 +670,14 @@ static const value * cache_named_exception(const value * _Atomic * cache,
const char * name)
{
const value * exn;
- exn = atomic_load_explicit(cache, memory_order_acquire);
+ exn = atomic_load_acquire(cache);
if (exn == NULL) {
exn = caml_named_value(name);
if (exn == NULL) {
fprintf(stderr, "Fatal error: exception %s\n", name);
exit(2);
}
- atomic_store_explicit(cache, exn, memory_order_release);
+ atomic_store_release(cache, exn);
}
return exn;
}