on master help sign in
fix parsing around integers in tutd involving spacing
f0a36d2AgentM
src/bin/TutorialD/Interpreter/Base.hs+2−2
@@ -137,9 +137,9 @@ semi = symbol ";"
137
137
138integer :: Parser Integer
138integer :: Parser Integer
139#if MIN_VERSION_megaparsec(6,0,0)
139#if MIN_VERSION_megaparsec(6,0,0)
140−integer = Lex.signed spaceConsumer Lex.decimal
140+integer = Lex.signed (pure ()) Lex.decimal <* spaceConsumer
141#else
141#else
142−integer = Lex.signed spaceConsumer Lex.integer
142+integer = Lex.signed (pure ()) Lex.integer <* spaceConsumer
143#endif
143#endif
144
144
145natural :: Parser Integer
145natural :: Parser Integer