sig val open_in_gen : Pervasives.open_flag list -> int -> string -> Pervasives.in_channel val open_out_gen : Pervasives.open_flag list -> int -> string -> Pervasives.out_channel val ounit_tests : unit -> OUnit.test end