module MakePort: functor (Serv : sig val srv : stringend) -> sig .. end
functor (
Serv
:
sig
val srv : string
string
end
) ->
sig val srv : string end
include struct ... end
val random : unit -> t
unit -> t