module Errorloc:sig
..end
val newline : unit -> unit
val currentLoc : unit -> Lexing.position * Lexing.position
val setCurrentWorkingDirectory : string -> unit
val setCurrentFile : ?normalize:bool -> string -> unit
setCurrentFile ~normalize:false path
accepts path
as the current file "as is". Else (the default), if
path
is relative, make it relative to the current working
directory if it has been set; then in any case attempts to shorten
the path to the current file using Filepath.normalize
.
This function should not be called with a string argument which
has been already normalized (because normalization can make path
relative to a different path).
val setCurrentLine : int -> unit
val startParsing : string -> Lexing.lexbuf
val finishParsing : unit -> unit
Errorloc.clear_errors
when they
start, and check Errorloc.had_errors
when they end.val parse_error : ?source:Lexing.position ->
('a, Format.formatter, unit, 'b) Pervasives.format4 -> 'a
val had_errors : unit -> bool
Errorloc.clear_errors
?val clear_errors : unit -> unit