git.iko.soy/elk
on master help sign in
Make sure List types are localized
commiteb236caa502bcb02ad3cf8f1c1310250c14104c2 authorEvan Czaplicki <evancz@users.noreply.github.com> dateSat 18 Aug 2018, 14:36 (8 years ago) parent4ed70cc
1 file changed+3−1
compare with master
unifiedsplit
compiler/src/Reporting/Render/Type/Localizer.hs+3−1
compiler/src/Reporting/Render/Type/Localizer.hs+3−1
@@ -62,7 +62,7 @@ toDoc localizer home name =
6262
6363
6464toString :: Localizer -> ModuleName.Canonical -> N.Name -> String
65−toString (Localizer localizer) (ModuleName.Canonical _ home) name =
65+toString (Localizer localizer) moduleName@(ModuleName.Canonical _ home) name =
6666 case Map.lookup home localizer of
6767 Nothing ->
6868 N.toString home <> "." <> N.toString name
@@ -75,6 +75,8 @@ toString (Localizer localizer) (ModuleName.Canonical _ home) name =
7575 Only set ->
7676 if Set.member name set then
7777 N.toString name
78+ else if name == N.list && moduleName == ModuleName.list then
79+ "List"
7880 else
7981 N.toString (maybe home id alias) <> "." <> N.toString name
8082