module Cf_journal:Diagnostic event journaling.sig..end
The core interface is functorial, and is intended for extensibility. An
additional interface is provided for simplicity of use in the common case
of journaling diagnostic messages to Pervasives.out_channel objects, e.g
stdout and stderr.
Functorial Interface
The type of the module produced the Create(P: Cf_ordered.Total_T)
functor defined below.
module type T =sig..end
module Create:
T that defines extensible
diagnostic event journaling with messages prioritized by codes in the total
order defined by the module P.
module Basic:sig..end
class[[> Basic.level ]]basic_prioritizer :object..end
`Invalid, `Fail, `Error,
`Warn, `Info and `Debug.
class[[> Basic.level ] #Basic.event]basic_channel_archiver :Pervasives.out_channel ->object..end
class virtual[[> Basic.level ] #Basic.eventbasic_agent :
#Basic.archiver]([> Basic.level ] as 'a) #basic_prioritizer -> 'a -> ('a #Basic.event #Basic.archiver as 'b) list ->object..end
typet =Basic.level Basic.event Basic.archiver
basic_agent
stdout and stderr below.val stdout : t`Notice, and with with one
basic archiver for the Pervasives.stdout channel.val stderr : t`Notice, and with with one
basic archiver for the Pervasives.stderr channel.