module Work: sig .. end
sig
end
type t = {
set_thread_name_to :string option;
string option
doit :unit -> [ `Continue | `Stop ];
unit -> [ `Continue | `Stop ]
val sexp_of_t : t -> Sexplib.Sexp.t
t -> Sexplib.Sexp.t