'a #Cf_journal.T.prioritizer -> 'a -> string -> object method level : 'a method message : string method prioritizer : 'a Cf_journal.T.prioritizer end