sig
  type 'result t = 'result OUnitLogger.test_event -> unit
  val create :
    ('a, 'b) OUnitLogger.logger -> '-> 'OUnitLogger.test_event -> unit
  val raw_printf :
    ('OUnitLogger.test_event -> 'b) ->
    ('c, unit, string, 'b) Stdlib.format4 -> 'c
  val logf :
    ('OUnitLogger.test_event -> 'b) ->
    OUnitLogger.log_severity -> ('c, unit, string, 'b) Stdlib.format4 -> 'c
end