From 58a120615454c5eb73b560f8d3de6a45310d4aab Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Sat, 16 Aug 2008 12:15:38 -0400
Subject: Stub WHERE support

---
 src/lacweb.lex | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/lacweb.lex')

diff --git a/src/lacweb.lex b/src/lacweb.lex
index 50fe7f26..9e994b27 100644
--- a/src/lacweb.lex
+++ b/src/lacweb.lex
@@ -288,6 +288,10 @@ notags = [^<{\n]+;
 <INITIAL> "SELECT"    => (Tokens.SELECT (pos yypos, pos yypos + size yytext));
 <INITIAL> "FROM"      => (Tokens.FROM (pos yypos, pos yypos + size yytext));
 <INITIAL> "AS"        => (Tokens.AS (pos yypos, pos yypos + size yytext));
+<INITIAL> "WHERE"     => (Tokens.CWHERE (pos yypos, pos yypos + size yytext));
+
+<INITIAL> "TRUE"      => (Tokens.TRUE (pos yypos, pos yypos + size yytext));
+<INITIAL> "FALSE"     => (Tokens.FALSE (pos yypos, pos yypos + size yytext));
 
 <INITIAL> {id}        => (Tokens.SYMBOL (yytext, pos yypos, pos yypos + size yytext));
 <INITIAL> {cid}       => (Tokens.CSYMBOL (yytext, pos yypos, pos yypos + size yytext));
-- 
cgit v1.2.3