git.iko.soy/elk
on master help sign in
Remove unnecessary let
fa6377fJoeyEremondi
src/Canonicalize/Declaration.hs+2−4
compare with master
unifiedsplit
@@ -91,7 +91,5 @@ buildFunction body@(A.A ann _) vars =
91
91
92definition :: String -> Canonical.Expr -> R.Region -> T.Canonical -> Canonical.Def
92definition :: String -> Canonical.Expr -> R.Region -> T.Canonical -> Canonical.Def
93definition name expr@(A.A ann _) region tipe =
93definition name expr@(A.A ann _) region tipe =
94− let
95− facts = Canonical.dummyFacts
94+ Canonical.Definition Canonical.dummyFacts
96− in
97− Canonical.Definition facts (A.A ann (P.Var name)) expr (Just (A.A region tipe))
95+ (A.A ann (P.Var name)) expr (Just (A.A region tipe))