sig
  val command :
    lock_file:string -> name:string -> (unit -> unit) -> Command.t
  val ounit_tests : unit -> OUnit.test
end