diff options
author | Chimrod <> | 2023-10-26 09:44:53 +0200 |
---|---|---|
committer | Chimrod <> | 2023-10-26 09:44:53 +0200 |
commit | 09f12acfb6d40f1b0b29625e87c2df58ecf9f275 (patch) | |
tree | 864e212f10dee0740646559fd92f85f321268419 /lib/qparser/lexer.ml | |
parent | fc235a1d2b7f10e6b5b1d7ed4328e2f9f7714171 (diff) |
Update the documentation in the parser
Diffstat (limited to 'lib/qparser/lexer.ml')
-rw-r--r-- | lib/qparser/lexer.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/qparser/lexer.ml b/lib/qparser/lexer.ml index 383d6a3..f2d04bf 100644 --- a/lib/qparser/lexer.ml +++ b/lib/qparser/lexer.ml @@ -43,11 +43,11 @@ let wait_balance : (Buffer.t -> Lexbuf.t -> 'a) -> Lexbuf.t -> 'a = with Not_found -> raise UnclosedQuote let space = [%sedlex.regexp? ' ' | '\t'] +let spaces = [%sedlex.regexp? Plus space] let eol = [%sedlex.regexp? '\r' | '\n' | "\r\n"] let coma = [%sedlex.regexp? ','] let digit = [%sedlex.regexp? '0' .. '9'] let letters = [%sedlex.regexp? 'a' .. 'z' | 'A' .. 'Z' | '_'] -let spaces = [%sedlex.regexp? Plus space] let ident = [%sedlex.regexp? Opt ('$' | '*'), letters, Star (digit | letters)] let location_ident = [%sedlex.regexp? letters | digit] let location_prefix = [%sedlex.regexp? '!' | '$' | '#' | '^'] |