simonpetit/ocaml_sql_parser
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adding tokens

Browse Source
This commit is contained in:
Simon Petit 2024-12-10 18:00:26 +01:00
parent 87959fae33
commit 4d62ebe2a3
1 changed files with 45 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lexer/lexer.mll
View File

@ -9,6 +9,9 @@ let alphanumeric = (alpha|digit)
rule read_token = parse rule read_token = parse
| "SELECT" { SELECT } | "SELECT" { SELECT }
| "AS" { AS }
| "DATE" { DATE }
| "TIME" { TIME }
| "AVG" { AVG } | "AVG" { AVG }
| "MAX" { MAX } | "MAX" { MAX }
| "MIN" { MIN } | "MIN" { MIN }
@ -38,13 +41,14 @@ rule read_token = parse
| "=" { EQUALS_OPERATOR } | "=" { EQUALS_OPERATOR }
| "(" { LEFT_PAREN } | "(" { LEFT_PAREN }
| ")" { RIGHT_PAREN } | ")" { RIGHT_PAREN }
| "," { COMMA } | ',' { COMMA }
| "|" { PIPE } | "|" { PIPE }
| "'" { QUOTE } | "'" { QUOTE }
| "+" { PLUS_SIGN } | "+" { PLUS_SIGN }
| "-" { MINUS_SIGN } | "-" { MINUS_SIGN }
| ':' { COLON }
| whitespace { read_token lexbuf } | whitespace { read_token lexbuf }
| digit+ { INTEGER } | digit+ as integer { INTEGER (int_of_string integer) }
| digit+"."digit+ { FLOAT } | digit+"."digit+ { FLOAT }
| '.'digit+ { FLOAT } | '.'digit+ { FLOAT }
| alpha alphanumeric* as ident { IDENT ident } | alpha alphanumeric* as ident { IDENT ident }