git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix a bug with TCO for multiple argument functions, fix #461
eadf235Phil Freeman
src/Language/PureScript/Optimizer/TCO.hs+1−1
compare with golang
unifiedsplit
@@ -41,7 +41,7 @@ tco' = everywhereOnJS convert
41 in case () of
41 in case () of
42 _ | isTailCall name body' ->
42 _ | isTailCall name body' ->
43 let
43 let
44− allArgs = reverse $ concat argss
44+ allArgs = concat $ reverse argss
45 in
45 in
46 JSVariableIntroduction name (Just (replace (toLoop name allArgs body')))
46 JSVariableIntroduction name (Just (replace (toLoop name allArgs body')))
47 | otherwise -> js
47 | otherwise -> js