Mercurial > urweb

diff src/lacweb.grm @ 6:38bf996e1c2e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Check for leftover kind unifs
author Adam Chlipala <adamc@hcoop.net>
date Sat, 26 Jan 2008 16:44:39 -0500
parents 5c3cc348e9e6
children 2ce5bf227d01
line wrap: on
line diff
--- a/src/lacweb.grm	Sat Jan 26 16:02:47 2008 -0500
+++ b/src/lacweb.grm	Sat Jan 26 16:44:39 2008 -0500
@@ -69,6 +69,7 @@
 
 %nonassoc DARROW
 %nonassoc COLON
+%nonassoc DCOLON TCOLON
 %right COMMA
 %right ARROW LARROW
 %right PLUSPLUS
@@ -102,6 +103,8 @@
 
        | FN SYMBOL kcolon kind DARROW cexp (CAbs (kcolon, SYMBOL, kind, cexp), s (FNleft, cexpright))
 
+       | LPAREN cexp RPAREN DCOLON kind (CAnnot (cexp, kind), s (LPARENleft, RPARENright))
+
 kcolon : DCOLON                         (Explicit)
        | TCOLON                         (Implicit)