Up

module Pparse

: sig
#
type error =
# | CannotRun of string
# | WrongMagic of string
#
exception Error of error
#
val preprocess : string -> string
#
val remove_preprocessed : string -> unit
#
val file : Format.formatter -> tool_name:string -> string -> string -> (Lexing.lexbuf -> 'a) -> ?doc_fun:(string -> 'a -> 'a) -> string -> 'a
#
val apply_rewriters : ?restore:bool -> tool_name:string -> string -> 'a -> 'a
#
val apply_rewriters_str : ?restore:bool -> tool_name:string -> Parsetree.structure -> Parsetree.structure
#
val apply_rewriters_sig : ?restore:bool -> tool_name:string -> Parsetree.signature -> Parsetree.signature
#
val report_error : Format.formatter -> error -> unit
#
val parse_implementation : Format.formatter -> tool_name:string -> string -> Parsetree.structure
#
val parse_interface : Format.formatter -> tool_name:string -> string -> Parsetree.signature
end