# Module OUnitLogger.Test

    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