From b81169750193dfb71fb48764619f81dbac29c37d Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Wed, 11 Jun 2014 14:22:47 -0400 Subject: let..where..end --- src/urweb.grm | 1 + 1 file changed, 1 insertion(+) (limited to 'src/urweb.grm') diff --git a/src/urweb.grm b/src/urweb.grm index 157ecfac..4671569d 100644 --- a/src/urweb.grm +++ b/src/urweb.grm @@ -1456,6 +1456,7 @@ eterm : LPAREN eexp RPAREN (#1 eexp, s (LPARENleft, RPARENright)) | UNDER (EWild, s (UNDERleft, UNDERright)) | LET edecls IN eexp END (ELet (edecls, eexp), s (LETleft, ENDright)) + | LET eexp WHERE edecls END (ELet (edecls, eexp), s (LETleft, ENDright)) | LBRACK RBRACK (EVar (["Basis"], "Nil", Infer), s (LBRACKleft, RBRACKright)) -- cgit v1.2.3