Cont (cobol_common.Cobol_common.Diagnostics.Cont)

val kdiag : 
  Cobol_common__.Diagnostics_sigs.severity ->
  (t -> _) ->
  ?loc:Srcloc.srcloc ->
  (_, _) Pretty.func

val khint : (t -> _) -> ?loc:Srcloc.srcloc -> (_, _) Pretty.func

val knote : (t -> _) -> ?loc:Srcloc.srcloc -> (_, _) Pretty.func

val kinfo : (t -> _) -> ?loc:Srcloc.srcloc -> (_, _) Pretty.func

val kwarn : (t -> _) -> ?loc:Srcloc.srcloc -> (_, _) Pretty.func

val kerror : (t -> _) -> ?loc:Srcloc.srcloc -> (_, _) Pretty.func

val kblind : (t -> 'a) -> t -> 'a