functor (Test_pipeline : TEST_PIPELINE) ->
  sig
    val write_file : string -> content:string -> unit
    val cmdf : ('a, unit, string, unit) Pervasives.format4 -> 'a
    val ( // ) : string -> string -> string
    val test_dir : string
    val main : string -> string list
  end