Mercurial > urweb

diff src/urweb.grm @ 1116:ce56795b2e5f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Loosen parsing of multiplication
author Adam Chlipala <adamc@hcoop.net>
date Tue, 05 Jan 2010 10:22:55 -0500
parents 8d3aa6c7cee0
children ad9829c3c12c
line wrap: on
line diff
--- a/src/urweb.grm	Sun Jan 03 17:13:45 2010 -0500
+++ b/src/urweb.grm	Tue Jan 05 10:22:55 2010 -0500
@@ -959,7 +959,7 @@
        | MINUS eterm                    (native_unop ("neg", eterm, s (MINUSleft, etermright)))
        | eexp PLUS eexp                 (native_op ("plus", eexp1, eexp2, s (eexp1left, eexp2right)))
        | eexp MINUS eexp                (native_op ("minus", eexp1, eexp2, s (eexp1left, eexp2right)))
-       | eterm STAR eexp                (native_op ("times", eterm, eexp, s (etermleft, eexpright)))
+       | eapps STAR eexp                (native_op ("times", eapps, eexp, s (eappsleft, eexpright)))
        | eexp DIVIDE eexp               (native_op ("divide", eexp1, eexp2, s (eexp1left, eexp2right)))
        | eexp MOD eexp                  (native_op ("mod", eexp1, eexp2, s (eexp1left, eexp2right)))