git.iko.soy/elk
on master help sign in
cosmetic: minor indentation change
60057caEvan Czaplicki
src/AST/Expression/General.hs+4−2
compare with master
unifiedsplit
@@ -282,7 +282,9 @@ collectLambdas
282collectLambdas lexpr@(A.A _ expr) =
282collectLambdas lexpr@(A.A _ expr) =
283 case expr of
283 case expr of
284 Lambda pattern body ->
284 Lambda pattern body ->
285+ let
285− let (ps, body') = collectLambdas body
286+ (ps, body') = collectLambdas body
287+ in
286− in (pattern : ps, body')
288+ (pattern : ps, body')
287
289
288 _ -> ([], lexpr)
290 _ -> ([], lexpr)