mirror of
https://github.com/c-cube/moonpool.git
synced 2025-12-05 19:00:33 -05:00
11 lines
228 B
OCaml
11 lines
228 B
OCaml
open! Moonpool
|
|
|
|
let (let@) = (@@)
|
|
|
|
let () =
|
|
(let@ pool = Ws_pool.with_ () in
|
|
T_fibers.Fls.run ~pool ~pool_name:"ws_pool" ());
|
|
|
|
(let@ pool = Fifo_pool.with_ () in
|
|
T_fibers.Fls.run ~pool ~pool_name:"fifo_pool" ());
|
|
()
|