Acc (cobol_common.Cobol_common.Diagnostics.Acc)

val diag : 
  Cobol_common__.Diagnostics_sigs.severity ->
  (Set.t as 's) ->
  ?tags:tag list ->
  ?loc:Srcloc.srcloc ->
  (_, 's) Pretty.func

val hint : 
  (Set.t as 's) ->
  ?tags:tag list ->
  ?loc:Srcloc.srcloc ->
  (_, 's) Pretty.func

val note : 
  (Set.t as 's) ->
  ?tags:tag list ->
  ?loc:Srcloc.srcloc ->
  (_, 's) Pretty.func

val info : 
  (Set.t as 's) ->
  ?tags:tag list ->
  ?loc:Srcloc.srcloc ->
  (_, 's) Pretty.func

val warn : 
  (Set.t as 's) ->
  ?tags:tag list ->
  ?loc:Srcloc.srcloc ->
  (_, 's) Pretty.func

val error : 
  (Set.t as 's) ->
  ?tags:tag list ->
  ?loc:Srcloc.srcloc ->
  (_, 's) Pretty.func

val blind : Set.t -> t -> Set.t