OUnitBracketSourceval logf :
('a OUnitLogger.test_event -> 'b) ->
OUnitLogger.log_severity ->
('c, unit, string, 'b) format4 ->
'cval bracket_tmpfile :
?prefix:string ->
?suffix:string ->
?mode:open_flag list ->
OUnitTest.ctxt ->
string * out_channelval with_bracket :
OUnitTest.ctxt ->
(OUnitTest.ctxt -> 'a) ->
('a -> OUnitTest.ctxt -> 'b) ->
'b