[MLton-commit] r4774

[Vesa Karvonen]

Fixed a bug in the grammar; a sequence of basdecs should be accepted in
local declarations according to the formal specification.

----------------------------------------------------------------------

U   mlton/trunk/mlton/front-end/mlb.grm

----------------------------------------------------------------------

Modified: mlton/trunk/mlton/front-end/mlb.grm
===================================================================
--- mlton/trunk/mlton/front-end/mlb.grm	2006-10-25 14:32:01 UTC (rev 4773)
+++ mlton/trunk/mlton/front-end/mlb.grm	2006-10-25 15:18:52 UTC (rev 4774)
@@ -198,7 +198,7 @@
 
 basexpnode : BAS basdecs END           (Basexp.Bas basdecs)
            | basid                     (Basexp.Var basid)
-           | LET basdec IN basexp END  (Basexp.Let (basdec, basexp))
+           | LET basdecs IN basexp END (Basexp.Let (basdecs, basexp))
 
 basid : id  (Basid.fromSymbol id)
 basids : basid ([basid])