aboutsummaryrefslogtreecommitdiff
path: root/lib/qparser/lexer.ml
diff options
context:
space:
mode:
authorChimrod <>2023-10-26 09:44:53 +0200
committerChimrod <>2023-10-26 09:44:53 +0200
commit09f12acfb6d40f1b0b29625e87c2df58ecf9f275 (patch)
tree864e212f10dee0740646559fd92f85f321268419 /lib/qparser/lexer.ml
parentfc235a1d2b7f10e6b5b1d7ed4328e2f9f7714171 (diff)
Update the documentation in the parser
Diffstat (limited to 'lib/qparser/lexer.ml')
-rw-r--r--lib/qparser/lexer.ml2
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? '!' | '$' | '#' | '^']