13 lines
225 B
OCaml
13 lines
225 B
OCaml
|
(* The lexical analyzer *)
|
||
|
|
|
||
|
|
val token: Lexing.lexbuf -> Parser.token
|
||
|
|
|
||
|
|
type error =
|
||
|
|
Illegal_character
|
||
|
|
| Unterminated_comment
|
||
|
|
| Unterminated_string
|
||
|
|
|
||
|
|
exception Error of error * int * int
|
||
|
|
|
||
|
|
val report_error: error -> unit
|