module Raw: sig .. end
sig
end
val wrap : (unit -> 'a) -> 'a CCMonadIO.t
(unit -> 'a) -> 'a CCMonadIO.t
wrap f
f ()
f