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

test: add regression test for bug in join_array

Browse source
This commit is contained in:
Simon Cruanes 2023-06-15 11:42:03 -04:00
parent c6157ac84d
commit 5d4a29a056
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
test/t_futs1.ml
View file

@ -109,3 +109,7 @@ let () =
in
ignore (Fut.wait_block_exn (Fut.join_list [ fut1; fut2 ]) : _ list);
assert (Atomic.get n = 99 * 100)
let () =
let x = [| Fut.return 1 |] |> Fut.join_array |> Fut.wait_block_exn in
assert (x = [| 1 |])