Module Syntaxerr

module Syntaxerr: sig .. end

type error =

`\|`	`Unclosed of Location.t * string * Location.t * string`
`\|`	`Expecting of Location.t * string`
`\|`	`Not_expecting of Location.t * string`
`\|`	`Applicative_path of Location.t`
`\|`	`Variable_in_scope of Location.t * string`
`\|`	`Other of Location.t`
`\|`	`Ill_formed_ast of Location.t * string`
`\|`	`Invalid_package_type of Location.t * string`

exception Error of error

exception Escape_error

val report_error : Format.formatter -> error -> unit

val location_of_error : error -> Location.t

val ill_formed_ast : Location.t -> string -> 'a