Kwapp.MESSAGES

sig
  val verbose :
    ?notreally:bool ->
    ?chan:Pervasives.out_channel ->
    ?flush:bool ->
    ?nl:bool ->
    ?initial:bool ->
    ?myself:string option ->
    int -> ('a, unit, string, unit) Pervasives.format4 -> 'a
  val warning :
    ?chan:Pervasives.out_channel ->
    ?myself:string option ->
    ?fatal:bool -> ('a, unit, string, unit) Pervasives.format4 -> 'a
  val fatal :
    ?chan:Pervasives.out_channel ->
    ?myself:string option ->
    ?status:int -> ('a, unit, string, 'b) Pervasives.format4 -> 'a
  val dryrot :
    ?chan:Pervasives.out_channel ->
    ?myself:string option ->
    ?status:int ->
    ?bt:bool -> ('a, unit, string, 'b) Pervasives.format4 -> 'a
  val hdl : ?myself:string option -> 'a -> ('b -> 'c) -> 'b -> 'c
end