OUnitLogger.Testtype !'result t = 'result test_event -> unitval create : ('a, 'b) logger -> 'a -> 'b test_event -> unitval raw_printf : ('a test_event -> 'b) -> ('c, unit, string, 'b) format4 -> 'cval logf :
('a test_event -> 'b) ->
log_severity ->
('c, unit, string, 'b) format4 ->
'c