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

perf: quicker check for []

Browse source
This commit is contained in:
Simon Cruanes 2024-02-14 20:53:17 -05:00
parent e0f5b5bbcb
commit 6bf58e3e62
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/lwt/base.ml
View file

@ -47,7 +47,7 @@ module Action_queue = struct
while while
let old = Atomic.get self.q in let old = Atomic.get self.q in
if Atomic.compare_and_set self.q old (a :: old) then ( if Atomic.compare_and_set self.q old (a :: old) then (
is_first := old = []; is_first := old == [];
false false
) else ) else
true true