diff --git a/src/private/thread_local_storage_.real.ml b/src/private/thread_local_storage_.real.ml index 870abd3f..14f14ffb 100644 --- a/src/private/thread_local_storage_.real.ml +++ b/src/private/thread_local_storage_.real.ml @@ -1,5 +1,7 @@ (* vendored from https://github.com/c-cube/thread-local-storage *) +module Atomic = Atomic_ + (* sanity check *) let () = assert (Obj.field (Obj.repr (Thread.self ())) 1 = Obj.repr ())