fix for ocaml 5

This commit is contained in:
Simon Cruanes 2023-05-31 00:34:29 -04:00
parent 60e3e7a868
commit 22ab8e4a69
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -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)