Mercurial > urweb

diff src/lacweb.grm @ 149:7420fa18d657

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Record cut
author Adam Chlipala <adamc@hcoop.net>
date Thu, 24 Jul 2008 10:09:21 -0400
parents 6f9e224692ec
children 34ccd7d2bea8
line wrap: on
line diff
--- a/src/lacweb.grm	Tue Jul 22 19:12:25 2008 -0400
+++ b/src/lacweb.grm	Thu Jul 24 10:09:21 2008 -0400
@@ -47,7 +47,7 @@
  | CON | LTYPE | VAL | REC | AND | FOLD | UNIT | KUNIT
  | TYPE | NAME
  | ARROW | LARROW | DARROW
- | FN | PLUSPLUS | DOLLAR | TWIDDLE
+ | FN | PLUSPLUS | MINUSMINUS | DOLLAR | TWIDDLE
  | STRUCTURE | SIGNATURE | STRUCT | SIG | END | FUNCTOR | WHERE | EXTERN
  | INCLUDE | OPEN | CONSTRAINT | CONSTRAINTS | EXPORT
 
@@ -111,7 +111,7 @@
 %nonassoc DCOLON TCOLON
 %right COMMA
 %right ARROW LARROW
-%right PLUSPLUS
+%right PLUSPLUS MINUSMINUS
 %nonassoc TWIDDLE
 %nonassoc DOLLAR
 %left DOT
@@ -285,6 +285,7 @@
                                          end)
 
        | LPAREN eexp RPAREN DCOLON cexp (EAnnot (eexp, cexp), s (LPARENleft, cexpright))
+       | eexp MINUSMINUS cexp           (ECut (eexp, cexp), s (eexpleft, cexpright))
 
 eterm  : LPAREN eexp RPAREN             (#1 eexp, s (LPARENleft, RPARENright))