RunLoop.RunResult
type t =
| Finished
| Stopped
| TimedOut
| HandledSource
val typ : t Ctypes.typ
val to_string : t -> string