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

perf pool: use relax() in spin loop

Browse source
This commit is contained in:
Simon Cruanes 2023-06-08 00:19:24 -04:00
parent 259fee2722
commit 0b70060c40
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/pool.ml
View file

@ -18,7 +18,7 @@ let add_global_thread_loop_wrapper f : unit =
let l = A.get global_thread_wrappers_ in let l = A.get global_thread_wrappers_ in
not (A.compare_and_set global_thread_wrappers_ l (f :: l)) not (A.compare_and_set global_thread_wrappers_ l (f :: l))
do do
() Domain_.relax ()
done done
exception Shutdown exception Shutdown