Module SpawnSource

Sourcemodule type Control = sig ... end
Sourcemodule type MainLoopModel = sig ... end
Sourcemodule Async (ML : MainLoopModel) : sig ... end
Sourcemodule Sync () : sig ... end
Sourcetype req =
  1. | ReqDie
  2. | Hello of int * int
Sourceval proto_version : int