Location.Errorval createf : loc:t -> ('a, Format.formatter, unit, t) format4 -> 'aval message : t -> stringval register_error_of_exn : (exn -> t option) -> unitval of_exn : exn -> t optionval to_extension : t -> string Astlib.Location.loc * Parsetree.payloadval raise : t -> 'a