exa/prlg
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fold app as it should be folded

Browse source
This commit is contained in:
Mirek Kratochvil 2023-01-07 18:13:32 +01:00
parent c718b76e33
commit dab150976d
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
app/Parser.hs
View file

@ -218,7 +218,7 @@ err :: ShuntError -> Either ShuntError a
err = Left err = Left
shuntPrlg :: Ops -> PAST -> ShuntResult shuntPrlg :: Ops -> PAST -> ShuntResult
shuntPrlg ot = shuntPrlg' (("", Op 0 $ Infix X Y) : ot) shuntPrlg ot = shuntPrlg' (("", Op 0 $ Infix Y X) : ot)
shuntPrlg' :: Ops -> PAST -> ShuntResult shuntPrlg' :: Ops -> PAST -> ShuntResult
shuntPrlg' ot (List hs t) = shuntPrlg' ot (List hs t) =