Minimal SQLite key-value store for OCaml
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Remove underscore prefix from used binding in SQLite lexer (E335)

+2 -2
+2 -2
lib/lexer.ml
··· 96 96 | '[' -> Parser.IDENT (read_bracket_quoted (Buffer.create 32) lexbuf) 97 97 | '`' -> Parser.IDENT (read_backtick_quoted (Buffer.create 32) lexbuf) 98 98 | '\'' -> 99 - let _s = read_single_quoted (Buffer.create 32) lexbuf in 99 + let s = read_single_quoted (Buffer.create 32) lexbuf in 100 100 (* String literals in DDL are typically DEFAULT values; 101 101 treat them as numbers (opaque values) in the token stream *) 102 - Parser.NUMBER ("'" ^ _s ^ "'") 102 + Parser.NUMBER ("'" ^ s ^ "'") 103 103 | eof -> Parser.EOF 104 104 | any -> 105 105 (* Pass through operators, signs, etc. as NUMBER tokens *)