mirror of
https://github.com/c-cube/moonpool.git
synced 2025-12-06 03:05:30 -05:00
fix for ocaml 5
This commit is contained in:
parent
60e3e7a868
commit
22ab8e4a69
1 changed files with 1 additions and 1 deletions
|
|
@ -66,7 +66,7 @@ type t = unit Domain.t
|
||||||
let get_id (self:t) : int = (Domain.get_id self :> int)
|
let get_id (self:t) : int = (Domain.get_id self :> int)
|
||||||
|
|
||||||
let spawn f : t =
|
let spawn f : t =
|
||||||
Domain.spawn f ()
|
Domain.spawn f
|
||||||
|}
|
|}
|
||||||
|
|
||||||
let p_version s = Scanf.sscanf s "%d.%d" (fun x y -> x, y)
|
let p_version s = Scanf.sscanf s "%d.%d" (fun x y -> x, y)
|
||||||
|
|
|
||||||
Loading…
Add table
Reference in a new issue