Commit f72df0c2 authored by Raphaël Cauderlier's avatar Raphaël Cauderlier
Browse files

Typos

parent d72f856b
...@@ -3,14 +3,14 @@ ...@@ -3,14 +3,14 @@
exception Unexpected_char of char exception Unexpected_char of char
} }
let id = [ 'a'-'z' ] ['a'-'z' 'A'-'Z' '_' '0'-'9']* in let id = [ 'a'-'z' ] ['a'-'z' 'A'-'Z' '_' '0'-'9']*
rule token = parse rule token = parse
| [ ' ' '\t' ] { token lexbuf } | [ ' ' '\t' ] { token lexbuf }
| '\n' { token lexbuf } | '\n' { token lexbuf }
| '.'(id as s)"<=" { UPDATE (s) } | '.'(id as s)"<=" { UPDATE (s) }
| '.'(id as s) { SELECT (s) } | '.'(id as s) { SELECT (s) }
| '.'(is as s)":=" { FUPD(s) } | '.'(id as s)":=" { FUPD(s) }
| '[' { LBRACK } | '[' { LBRACK }
| ']' { RBRACK } | ']' { RBRACK }
| ':' { COLUMN } | ':' { COLUMN }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment