simon/moonpool
1
0
Fork 0
mirror of https://github.com/c-cube/moonpool.git synced 2025-12-06 11:15:38 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

compat

Browse source
This commit is contained in:
Simon Cruanes 2024-08-26 11:23:54 -04:00
parent 444f8a3acc
commit 14fdee0593
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/private/thread_local_storage_.real.ml
View file

@ -1,5 +1,7 @@
(* vendored from https://github.com/c-cube/thread-local-storage *) (* vendored from https://github.com/c-cube/thread-local-storage *)
module Atomic = Atomic_
(* sanity check *) (* sanity check *)
let () = assert (Obj.field (Obj.repr (Thread.self ())) 1 = Obj.repr ()) let () = assert (Obj.field (Obj.repr (Thread.self ())) 1 = Obj.repr ())