class virtual [[> Basic.level ] #Basic.event
#Basic.archiver] basic_agent : ([> Basic.level ] as 'a) #basic_prioritizer -> 'a -> ('a #Basic.event #Basic.archiver as 'b) list -> object .. end
The basic journaling agent. Derive a subclass to define an agent that can
construct events derived from the basic event (which may also require
archivers derived from the basic archiver that can format any additional
required output). The class defines six public methods for output of
diagnostic events, one for each basic priority level.
Inherits
method invalid : 'a0 'b0. ('a0, unit, string, 'b0) Pervasives.format4 -> 'a0
Use a#invalid msg ... to format message text to put to the
archivers at the `Invalid level, and finally used to raise an
Invalid_argument exception.
method fail : 'a0 'b0. ('a0, unit, string, 'b0) Pervasives.format4 -> 'a0
Use a#fail msg ... to format message text to put to the
archivers at the `Fail level, and finally used to raise an
Failure exception.
method error : 'a0. ('a0, unit, string, unit) Pervasives.format4 -> 'a0
Use a#error msg ... to format message text to put to the
archivers at the `Error level.
method warn : 'a0. ('a0, unit, string, unit) Pervasives.format4 -> 'a0
Use a#warn msg ... to format message text to put to the
archivers at the `Warn level.
method notice : 'a0. ('a0, unit, string, unit) Pervasives.format4 -> 'a0
Use a#notice msg ... to format message text to put to the
archivers at the `Notice level.
method info : 'a0. ('a0, unit, string, unit) Pervasives.format4 -> 'a0
Use a#info msg ... to format message text to put to the
archivers at the `Info level.
method debug : 'a0. ('a0, unit, string, bool) Pervasives.format4 -> 'a0
Use a#debug msg ... to format message text to put to the
archivers at the `Debug level. The result of the formatting
continuation is always true. This is to facilitate using the
method inside assert blocks.