Cont (cobol_common.Cobol_common.Diagnostics.Cont)

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

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

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

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

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

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

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