# Class Cf_journal.basic_channel_archiver

    class [[> Basic.level ] #Basic.event] basic_channel_archiver : Pervasives.out_channel -> object .. end

The basic channel archiver. Use `new basic_channel_archiver c` to construct an archiver that emits each basic event `e` with a priority level less than ``Fail` to the channel `c` using `Printf.fprintf c "%s: %s\n"
e#prioritizer#tag e#message`.

    method channel : Pervasives.out_channel

Returns the channel used to construct the archiver.

    method emit : ([> Basic.level ] #Basic.event as 'a) -> unit

Emits each basic event `e` with a priority level less than ``Fail` to the channel `c` using `Printf.fprintf c "%s: %s\n"
e#prioritizer#tag e#message`.