sig val all : unit -> string list val register : string -> unit val ounit_tests : unit -> OUnit.test end