Cf_journal.basic_channel_archiverThe 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.
constraint 'self = 'event Basic.archiver constraint 'event = [> Basic.level ] Basic.eventmethod channel : out_channelReturns the channel used to construct the archiver.