git.iko.soy/stackage
on f638da2 help sign in
stackage/Stackage/Config.hs
233 lines 8.6 kB history raw
1{-# LANGUAGE CPP #-}
2module Stackage.Config where
4import Control.Monad (when)
5import Control.Monad.Trans.Writer (execWriter, tell)
6import qualified Data.Map as Map
7import Data.Set (fromList)
8import Distribution.Text (simpleParse)
9import Stackage.Types
11-- | Packages which are shipped with GHC but are not included in the
12-- Haskell Platform list of core packages.
13defaultExtraCore :: GhcMajorVersion -> Set PackageName
14defaultExtraCore _ = fromList $ map PackageName $ words
15 "binary Win32"
17-- | Test suites which are expected to fail for some reason. The test suite
18-- will still be run and logs kept, but a failure will not indicate an
19-- error in our package combination.
20defaultExpectedFailures :: GhcMajorVersion
21 -> Set PackageName
22defaultExpectedFailures _ = fromList $ map PackageName
23 [ -- Requires an old version of WAI and Warp for tests
24 "HTTP"
26 -- text and setenv have recursive dependencies in their tests, which
27 -- cabal can't (yet) handle
28 , "text"
29 , "setenv"
31 -- The version of GLUT included with the HP does not generate
32 -- documentation correctly.
33 , "GLUT"
35 -- https://github.com/bos/statistics/issues/42
36 , "statistics"
38 -- https://github.com/kazu-yamamoto/simple-sendfile/pull/10
39 , "simple-sendfile"
41 -- http://hackage.haskell.org/trac/hackage/ticket/954
42 , "diagrams"
44 -- https://github.com/fpco/stackage/issues/24
45 , "unix-time"
47 -- With transformers 0.3, it doesn't provide any modules
48 , "transformers-compat"
50 -- Tests require shell script and are incompatible with sandboxed package
51 -- databases
52 , "HTF"
54 -- https://github.com/simonmar/monad-par/issues/28
55 , "monad-par"
57 -- Unfortunately network failures seem to happen haphazardly
58 , "network"
60 -- https://github.com/ekmett/hyphenation/issues/1
61 , "hyphenation"
63 -- Test suite takes too long to run on some systems
64 , "punycode"
66 -- http://hub.darcs.net/stepcut/happstack/issue/1
67 , "happstack-server"
69 -- Requires a Facebook app.
70 , "fb"
72 -- https://github.com/tibbe/hashable/issues/64
73 , "hashable"
75 -- https://github.com/vincenthz/language-java/issues/10
76 , "language-java"
78 , "threads"
79 , "crypto-conduit"
80 , "pandoc"
81 , "language-ecmascript"
82 , "hspec"
83 , "alex"
85 -- https://github.com/basvandijk/concurrent-extra/issues/
86 , "concurrent-extra"
88 -- https://github.com/rrnewton/haskell-lockfree-queue/issues/7
89 , "abstract-deque"
90 ]
92-- | List of packages for our stable Hackage. All dependencies will be
93-- included as well. Please indicate who will be maintaining the package
94-- via comments.
95defaultStablePackages :: GhcMajorVersion -> Map PackageName (VersionRange, Maintainer)
96defaultStablePackages ghcVer = unPackageMap $ execWriter $ do
97 mapM_ (add "michael@snoyman.com") $ words =<<
98 [ "yesod yesod-newsfeed yesod-sitemap yesod-static yesod-test yesod-bin"
99 , "markdown filesystem-conduit mime-mail-ses"
100 , "persistent persistent-template persistent-sqlite"
101 , "network-conduit-tls yackage" -- Removed until keter supports non-Linux systems: keter
102 , "shakespeare-text process-conduit stm-conduit"
103 , "classy-prelude-yesod yesod-fay"
104 , "random-shuffle safe-failure"
105 ]
107 mapM_ (add "FP Complete <michael@fpcomplete.com>") $ words =<<
108 [ "web-fpco th-expand-syns configurator compdata smtLib unification-fd"
109 , "fixed-list indents language-c pretty-class"
110 , "aws yesod-auth-oauth csv-conduit cassava"
111 , "async"
112 , "hxt dimensional"
113 ]
114 when (ghcVer < GhcMajorVersion 7 6) $
115 addRange "FP Complete <michael@fpcomplete.com>" "hxt" "<= 9.3.0.1"
116 addRange "FP Complete <michael@fpcomplete.com>" "kure" "<= 2.4.10"
118 mapM_ (add "Neil Mitchell") $ words
119 "hlint hoogle shake"
121 mapM_ (add "Alan Zimmerman") $ words
122 "hjsmin language-javascript"
124 mapM_ (add "Jasper Van der Jeugt") $ words
125 "blaze-html blaze-markup stylish-haskell"
127 mapM_ (add "Antoine Latter") $ words
128 "uuid byteorder"
130 mapM_ (add "Stefan Wehr <wehr@factisresearch.com>") $ words
131 "HTF hscurses xmlgen stm-stats"
133 mapM_ (add "Bart Massey <bart.massey+stackage@gmail.com>") $ words
134 "parseargs"
136 mapM_ (add "Vincent Hanquez") $ words =<<
137 [ "asn1-data bytedump certificate cipher-aes cipher-rc4 connection"
138 , "cprng-aes cpu crypto-pubkey-types crypto-random-api cryptocipher"
139 , "cryptohash hit language-java libgit pem siphash socks tls"
140 , "tls-debug tls-extra vhd"
141 ]
142 addRange "Vincent Hanquez" "language-java" "< 0.2.5"
144#if !defined(mingw32_HOST_OS) && !defined(__MINGW32__)
145 -- Does not compile on Windows
146 mapM_ (add "Vincent Hanquez") $ words "udbus xenstore"
147#endif
149 mapM_ (add "Alberto G. Corona <agocorona@gmail.com>") $ words
150 "RefSerialize TCache Workflow MFlow"
152 mapM_ (add "Edward Kmett <ekmett@gmail.com>") $ words =<<
153 [ "ad adjunctions bifunctors bound categories charset comonad comonad-transformers"
154 , "comonads-fd comonad-extras compressed concurrent-supply constraints contravariant"
155 , "distributive either eq free groupoids heaps hyphenation"
156 , "integration intervals kan-extensions lca lens linear monadic-arrays machines"
157 , "mtl profunctors profunctor-extras reducers reflection"
158 , "representable-functors representable-tries"
159 , "semigroups semigroupoids semigroupoid-extras speculation tagged void"
160 , "graphs monad-products monad-st wl-pprint-extras wl-pprint-terminfo"
161 , "numeric-extras parsers pointed prelude-extras recursion-schemes reducers"
162 , "streams syb-extras vector-instances"
163 ]
165 mapM_ (add "Simon Hengel <sol@typeful.net>") $ words
166 "hspec doctest base-compat"
168 mapM_ (add "Brent Yorgey <byorgey@gmail.com>") $ words =<<
169 [ "monoid-extras dual-tree vector-space-points active force-layout"
170 , "diagrams diagrams-contrib diagrams-core diagrams-lib diagrams-svg"
171 , "diagrams-postscript diagrams-builder diagrams-haddock haxr"
172 , "BlogLiterately BlogLiterately-diagrams"
173 ]
175 mapM_ (add "Patrick Brisbin") $ words "gravatar"
177 mapM_ (add "Felipe Lessa <felipe.lessa@gmail.com>") $ words
178 "esqueleto fb fb-persistent yesod-fb yesod-auth-fb"
180 mapM_ (add "Alexander Altman <alexanderaltman@me.com>") $ words
181 "base-unicode-symbols containers-unicode-symbols"
183 mapM_ (add "Ryan Newton <ryan.newton@alum.mit.edu>") $ words
184 "accelerate"
186 mapM_ (add "Dan Burton <danburton.email@gmail.com>") $ words =<<
187 [ "basic-prelude composition io-memoize numbers rev-state runmemo"
188 , "tardis"
189 ]
191 mapM_ (add "Daniel Díaz <dhelta.diaz@gmail.com>") $ words
192 "HaTeX"
194 -- https://github.com/fpco/stackage/issues/46
195 addRange "Michael Snoyman" "QuickCheck" "< 2.6"
197 -- https://github.com/fpco/stackage/issues/68
198 addRange "Michael Snoyman" "criterion" "< 0.8"
200 -- https://github.com/fpco/stackage/issues/70
201 addRange "Michael Snoyman" "monoid-extras" "< 0.3"
203 -- https://github.com/fpco/stackage/issues/72
204 addRange "Michael Snoyman" "HaXml" "< 1.24"
206 -- https://github.com/fpco/stackage/issues/96
207 addRange "Michael Snoyman" "generic-deriving" "< 1.6"
209 -- Due to binary package dep
210 addRange "Michael Snoyman" "statistics" "< 0.10.4"
212 -- https://github.com/fpco/stackage/issues/81
213 addRange "Michael Snoyman" "fingertree" "< 0.1"
215 -- https://github.com/fpco/stackage/issues/89
216 addRange "Michael Snoyman" "semigroupoids" "< 3.1"
218 addRange "Michael Snoyman" "hashable" "< 1.2"
220 -- Requires containers 0.5, not supported by GHC 7.4
221 addRange "Michael Snoyman" "bytes" "< 0.8"
223 -- unknown symbol `utf8_table4'
224 addRange "Michael Snoyman" "regex-pcre-builtin" "< 0.94.4.6.8.31"
226 -- Requires too new a base/containers
227 addRange "Michael Snoyman" "vault" "< 0.3"
228 where
229 add maintainer package = addRange maintainer package "-any"
230 addRange maintainer package range =
231 case simpleParse range of
232 Nothing -> error $ "Invalid range " ++ show range ++ " for " ++ package
233 Just range' -> tell $ PackageMap $ Map.singleton (PackageName package) (range', Maintainer maintainer)