Diagnostics.InitStatefulval diag :
Cobol_common__.Diagnostics_sigs.severity ->
?tags:tag list ->
?loc:Srcloc.srcloc ->
_ Pretty.procval hint : ?tags:tag list -> ?loc:Srcloc.srcloc -> _ Pretty.procval note : ?tags:tag list -> ?loc:Srcloc.srcloc -> _ Pretty.procval info : ?tags:tag list -> ?loc:Srcloc.srcloc -> _ Pretty.procval warn : ?tags:tag list -> ?loc:Srcloc.srcloc -> _ Pretty.procval error : ?tags:tag list -> ?loc:Srcloc.srcloc -> _ Pretty.procval blind : t -> unitval add_all : diagnostics -> unitval grab_diags : 'a with_diags -> 'aval inspect : reset:bool -> diagnostics