git.iko.soy/elk
on master help sign in
remove Localizer code specific to REPL
57cf1a2Evan Czaplicki
compiler/src/Reporting/Render/Type/Localizer.hs−20
compare with master
unifiedsplit
@@ -7,8 +7,6 @@ module Reporting.Render.Type.Localizer
7 , empty
7 , empty
8 , fromNames
8 , fromNames
9 , fromModule
9 , fromModule
10− , replEmpty
11− , replAdd
12 )
10 )
13 where
11 where
14
12
@@ -18,7 +16,6 @@ import qualified Data.Name as Name
18import qualified Data.Set as Set
16import qualified Data.Set as Set
19
17
20import qualified AST.Source as Src
18import qualified AST.Source as Src
21−import qualified Elm.Compiler.Imports as Imports
22import qualified Elm.ModuleName as ModuleName
19import qualified Elm.ModuleName as ModuleName
23import Reporting.Doc ((<>))
20import Reporting.Doc ((<>))
24import qualified Reporting.Doc as D
21import qualified Reporting.Doc as D
@@ -121,20 +118,3 @@ addType (A.At _ exposed) types =
121 Src.Lower _ -> types
118 Src.Lower _ -> types
122 Src.Upper name _ -> Set.insert name types
119 Src.Upper name _ -> Set.insert name types
123 Src.Operator _ -> types
120 Src.Operator _ -> types
124−
125−
126−
127−-- REPL STUFF
128−
129−
130−replEmpty :: Localizer
131−replEmpty =
132− Localizer $
133− Map.insert Name.replModule (Import Nothing All) $
134− Map.fromList $ map toPair Imports.defaults
135−
136−
137−replAdd :: Name.Name -> Maybe Name.Name -> Src.Exposing -> Localizer -> Localizer
138−replAdd name alias exposing (Localizer localizer) =
139− Localizer $ Map.insert name (Import alias (toExposing exposing)) localizer
140−