sig exception ParsingSyntaxError of string val countline : Lexing.lexbuf -> unit val raise_syntax_error : string -> Lexing.position -> 'a end