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