on master help sign in
Improve indentation a bit
commit73621371cf3102b013f5c160cbb6547550ca171e authorEvan Czaplicki <info@elm-lang.org> dateTue 28 Apr 2015, 15:26 (12 years ago) parentdefb40c
1 file changed+4−2
src/Transform/Check.hs+4−2
src/Transform/Check.hs+4−2
@@ -58,8 +58,10 @@ duplicateValues decls =
5858
5959 defsDups :: [Valid.Def] -> Either String [Valid.Def]
6060 defsDups defs =
61− let varsIn (Valid.Definition pattern _ _) = Pattern.boundVarList pattern in
62− case dups $ concatMap varsIn defs of
61+ let varsIn (Valid.Definition pattern _ _) =
62+ Pattern.boundVarList pattern
63+ in
64+ case dups (concatMap varsIn defs) of
6365 [] -> Right defs
6466 name:_ -> Left name
6567