Bcfg_validateSourceval pp_error_with_source :
content:string ->
Format.formatter ->
[< `Lexer_error of
Bcfg.Txtloc.t * [< `Invalid_character of char | `Message of string ]
| `Parser_error of Bcfg.Txtloc.t * (int * Bcfg.Error.t) option
| `Rejected ] ->
unit