@@ -104,21 +104,12 @@ value home name =
104104
105105toGlobals :: Roots -> [Var.Global]
106106toGlobals roots =
107− hiddenDependencies ++
108− case roots of
109− Mains modules ->
110− map (\home -> Var.Global home "main") modules
107+ case roots of
108+ Mains modules ->
109+ map (\home -> Var.Global home "main") modules
111110
112− Value home name ->
113− [ Var.Global home name ]
114−
115−
116−-- needed for (==) and toString
117−hiddenDependencies :: [Var.Global]
118−hiddenDependencies =
119− [ Var.Global (ModuleName.inCore "Dict") "toList"
120− , Var.Global (ModuleName.inCore "Set") "toList"
121− ]
111+ Value home name ->
112+ [ Var.Global home name ]
122113
123114
124115