diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2010-01-05 10:22:55 -0500 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2010-01-05 10:22:55 -0500 |
| commit | 3f8f229b96791e5784bd2e5d63e5ccd7ed608e70 (patch) | |
| tree | d8dbbb510d6af4bdf77ba98ebc20d23eadaecd5f | |
| parent | 67085821cfd1d5524b386dee083f877b74e93f2e (diff) | |
Loosen parsing of multiplication
| -rw-r--r-- | src/urweb.grm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/urweb.grm b/src/urweb.grm index 93ff7321..647c311e 100644 --- a/src/urweb.grm +++ b/src/urweb.grm @@ -959,7 +959,7 @@ eexp : eapps (eapps) | 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))) |