small change to test

This commit is contained in:
Simon Cruanes 2023-10-27 14:47:59 -04:00
parent 68fe7221b8
commit 359ec0352b
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -25,7 +25,7 @@ let () = assert (List.init 10 fib_direct = [ 1; 1; 2; 3; 5; 8; 13; 21; 34; 55 ])
let fib_40 : int lazy_t =
lazy
(let@ _sp = Trace.with_span ~__FILE__ ~__LINE__ "fib40" in
let pool = Ws_pool.create ~min:8 () in
let pool = Fifo_pool.create ~min:8 () in
let r = fib ~on:pool 40 |> Fut.wait_block_exn in
Ws_pool.shutdown pool;
r)