From 787736a9d0548eb0115ec1eaa42f4e486de1189c Mon Sep 17 00:00:00 2001
From: Gabriel Kerneis
Date: Tue, 17 Dec 2013 13:39:45 +0000
Subject: Remove spurious lexing tokens

---
 src/lexer.mll  | 3 ---
 src/parser.mly | 2 +-
 2 files changed, 1 insertion(+), 4 deletions(-)

(limited to 'src')

diff --git a/src/lexer.mll b/src/lexer.mll
index b8660675..0b50cd4d 100644
--- a/src/lexer.mll
+++ b/src/lexer.mll
@@ -101,11 +101,8 @@ let kw_table =
      ("with",                    (fun x -> With));
      ("val",                     (fun x -> Val));
 
-     ("AND",			 (fun x -> AND));
      ("div",			 (fun x -> Div_));
-     ("EOR",			 (fun x -> EOR));
      ("mod",			 (fun x -> Mod));
-     ("OR",			 (fun x -> OR));
      ("quot",			 (fun x -> Quot));
      ("rem",			 (fun x -> Rem));
 
diff --git a/src/parser.mly b/src/parser.mly
index 10d6cf65..be69fc00 100644
--- a/src/parser.mly
+++ b/src/parser.mly
@@ -132,7 +132,7 @@ let star = "*"
 %nonassoc Then
 %nonassoc Else
 
-%token AND Div_ EOR Mod OR Quot Rem
+%token Div_ Mod Quot Rem
 
 %token Bar Colon Comma Dot Eof Minus Semi Under
 %token Lcurly Rcurly Lparen Rparen Lsquare Rsquare
-- 
cgit v1.2.3