Commit 5e8a310c authored by Bastian Kauschke's avatar Bastian Kauschke
Browse files

use single list in `parseFunctorExpression`

parent 2bba8185
......@@ -62,11 +62,10 @@ functorsParser functors = parseLevel (zip (reverse functors) [1..])
variable = L.symbol "X" >> return Variable
<?> "variable (X)"
-- FIXME: The double list is unnecessary currently
parseFunctorExpression ::
[[FunctorParser f]]
[FunctorParser f]
-> String
-> Text
-> Either ParseErr (FunctorExpression f Precedence)
parseFunctorExpression functors =
parse ((L.space *> L.newlines) *> functorsParser (concat functors) <* eof)
parse ((L.space *> L.newlines) *> functorsParser functors <* eof)
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment