on master help sign in
Put core name in shared library
1c6abbfjmite
src/Compile.hs+1−1
@@ -28,7 +28,7 @@ compile packageName isRoot interfaces source =
28 -- determine if default imports should be added
28 -- determine if default imports should be added
29 -- only elm-lang/core is exempt
29 -- only elm-lang/core is exempt
30 let needsDefaults =
30 let needsDefaults =
31− not (packageName == Package.Name "elm-lang" "core")
31+ not (packageName == Package.coreName)
32
32
33 -- Parse the source code
33 -- Parse the source code
34 validModule <-
34 validModule <-
src/Elm/Package.hs+5
@@ -24,6 +24,11 @@ dummyName =
24 Name "USER" "PROJECT"
24 Name "USER" "PROJECT"
25
25
26
26
27+coreName :: Name
28+coreName =
29+ Name "elm-lang" "core"
30+
31+
27toString :: Name -> String
32toString :: Name -> String
28toString name =
33toString name =
29 user name ++ "/" ++ project name
34 user name ++ "/" ++ project name