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 | 38803135d0ab33c5728595c9a7b787d88751765f (patch) | |
| tree | d8dbbb510d6af4bdf77ba98ebc20d23eadaecd5f /src | |
| parent | 85bd2c1f3750a8a918b93815e3550b462b113de5 (diff) | |
Loosen parsing of multiplication
Diffstat (limited to 'src')
| -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))) |