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