mirror of
https://github.com/sdiehl/write-you-a-haskell.git
synced 2024-09-11 19:47:31 +03:00
Remove unused var
from calculator grammar.
This commit is contained in:
parent
8c1e8471a9
commit
360ffe84a2
@ -124,7 +124,7 @@ parens m = do
|
|||||||
-- digit = "0" | "1" | ... | "8" | "9".
|
-- digit = "0" | "1" | ... | "8" | "9".
|
||||||
-- expr = term { addop term }.
|
-- expr = term { addop term }.
|
||||||
-- term = factor { mulop factor }.
|
-- term = factor { mulop factor }.
|
||||||
-- factor = "(" expr ")" | var | number.
|
-- factor = "(" expr ")" | number.
|
||||||
-- addop = "+" | "-".
|
-- addop = "+" | "-".
|
||||||
-- mulop = "*".
|
-- mulop = "*".
|
||||||
|
|
||||||
|
@ -153,7 +153,7 @@ number = [ "-" ] digit { digit }.
|
|||||||
digit = "0" | "1" | ... | "8" | "9".
|
digit = "0" | "1" | ... | "8" | "9".
|
||||||
expr = term { addop term }.
|
expr = term { addop term }.
|
||||||
term = factor { mulop factor }.
|
term = factor { mulop factor }.
|
||||||
factor = "(" expr ")" | var | number.
|
factor = "(" expr ")" | number.
|
||||||
addop = "+" | "-".
|
addop = "+" | "-".
|
||||||
mulop = "*".
|
mulop = "*".
|
||||||
```
|
```
|
||||||
|
Loading…
Reference in New Issue
Block a user