mirror of
https://github.com/commercialhaskell/stackage.git
synced 2026-01-12 07:18:31 +01:00
31 lines
1.0 KiB
Haskell
31 lines
1.0 KiB
Haskell
{-# LANGUAGE NoImplicitPrelude #-}
|
|
{-# LANGUAGE OverloadedStrings #-}
|
|
-- | Get the proposed build plan.
|
|
module Stackage2.ProposedPlan
|
|
( ProposedPlan (..)
|
|
, defaultProposedPlan
|
|
) where
|
|
|
|
import Stackage2.Prelude
|
|
import qualified Stackage.Config as Old
|
|
import qualified Stackage.Types as Old
|
|
|
|
data ProposedPlan = ProposedPlan
|
|
{ ppPackages :: Map PackageName (VersionRange, Maintainer)
|
|
-- ^ This does not include core packages or dependencies, just packages
|
|
-- added by some maintainer.
|
|
, ppExpectedFailures :: Set PackageName
|
|
-- ^ At some point in the future, we should split this into Haddock
|
|
-- failures, test failures, etc.
|
|
}
|
|
|
|
-- | The proposed plan from the requirements provided by contributors.
|
|
defaultProposedPlan :: ProposedPlan
|
|
defaultProposedPlan = ProposedPlan
|
|
{ ppPackages = fmap (Maintainer . pack . Old.unMaintainer)
|
|
<$> Old.defaultStablePackages ghcVer False
|
|
, ppExpectedFailures = Old.defaultExpectedFailures ghcVer False
|
|
}
|
|
where
|
|
ghcVer = Old.GhcMajorVersion 7 8
|