# HG changeset patch # User Adam Chlipala # Date 1262704975 18000 # Node ID ce56795b2e5fa85a6feeb83416a1dd7ffdfc5615 # Parent 150465f2895c25239e9745575eb38f84d6544b8a Loosen parsing of multiplication diff -r 150465f2895c -r ce56795b2e5f src/urweb.grm --- 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)))