git.iko.soy/elk
on master help sign in
Make sure package names are not inlined
4624721Evan Czaplicki
src/Elm/Package.hs+17−2
compare with master
unifiedsplit
@@ -3,7 +3,9 @@
3module Elm.Package
3module Elm.Package
4 ( Name(..)
4 ( Name(..)
5 , Package(..)
5 , Package(..)
6+ , dummyName, kernel, core
6− , dummyName, core, browser, virtualDom, html, webgl, linearAlgebra
7+ , browser, virtualDom, html
8+ , webgl, linearAlgebra
7 , toString, toText, toUrl, toFilePath
9 , toString, toText, toUrl, toFilePath
8 , fromText
10 , fromText
9 , Version(..)
11 , Version(..)
@@ -57,36 +59,49 @@ data Package =
57 deriving (Eq, Ord)
59 deriving (Eq, Ord)
58
60
59
61
62+{-# NOINLINE dummyName #-}
60dummyName :: Name
63dummyName :: Name
61dummyName =
64dummyName =
62− Name "user" "project"
65+ Name "user" "project"
63
66
64
67
68+{-# NOINLINE kernel #-}
69+kernel :: Name
70+kernel =
71+ Name "elm-lang" "kernel"
72+
73+
74+{-# NOINLINE core #-}
65core :: Name
75core :: Name
66core =
76core =
67 Name "elm-lang" "core"
77 Name "elm-lang" "core"
68
78
69
79
80+{-# NOINLINE browser #-}
70browser :: Name
81browser :: Name
71browser =
82browser =
72 Name "elm-lang" "browser"
83 Name "elm-lang" "browser"
73
84
74
85
86+{-# NOINLINE virtualDom #-}
75virtualDom :: Name
87virtualDom :: Name
76virtualDom =
88virtualDom =
77 Name "elm-lang" "virtual-dom"
89 Name "elm-lang" "virtual-dom"
78
90
79
91
92+{-# NOINLINE html #-}
80html :: Name
93html :: Name
81html =
94html =
82 Name "elm-lang" "html"
95 Name "elm-lang" "html"
83
96
84
97
98+{-# NOINLINE webgl #-}
85webgl :: Name
99webgl :: Name
86webgl =
100webgl =
87 Name "elm-community" "webgl"
101 Name "elm-community" "webgl"
88
102
89
103
104+{-# NOINLINE linearAlgebra #-}
90linearAlgebra :: Name
105linearAlgebra :: Name
91linearAlgebra =
106linearAlgebra =
92 Name "elm-community" "linear-algebra"
107 Name "elm-community" "linear-algebra"