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