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