Source

parvel / parvel_log.mli

type log_dest =
  [ Channel of out_channel
  | File of string
  | Function of (string -> unit)
  ]
;

type log_level
;

value log_level_debug : log_level;
value log_level_info : log_level;
value log_level_error : log_level;
value log_level_no : log_level;

value set :?log_dest:log_dest -> ?log_level:log_level -> unit -> unit
;


value debug : format4 'a unit string unit -> 'a;
value info : format4 'a unit string unit -> 'a;
value error : format4 'a unit string unit -> 'a;