Class Cf_journal.T.event

class ['level] event : 'level #prioritizer -> 'level -> string -> object .. end

The minimal class of diagnostic events. Use new event p v m to construct an event object with the prioritizer p, the priority level v, and the message m.

method prioritizer : 'level prioritizer

method level : 'level

method message : string