haskell/stackage
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage.git synced 2026-01-23 20:51:57 +01:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Document Stackage.CheckBuildPlan

Browse Source
This commit is contained in:
Chris Done 2015-01-04 20:49:14 +01:00
parent a99cd7dc76
commit ee9bc2bbed
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Stackage/CheckBuildPlan.hs
View File

@ -19,6 +19,7 @@ import Stackage.Prelude
-- FIXME check cycles in dependencies, only looking at libraries and -- FIXME check cycles in dependencies, only looking at libraries and
-- executables -- executables
-- | Check the build plan for missing deps, wrong versions, etc.
checkBuildPlan :: MonadThrow m => BuildPlan -> m () checkBuildPlan :: MonadThrow m => BuildPlan -> m ()
checkBuildPlan BuildPlan {..} checkBuildPlan BuildPlan {..}
| null errs' = return () | null errs' = return ()
@ -28,6 +29,10 @@ checkBuildPlan BuildPlan {..}
errs@(BadBuildPlan errs') = errs@(BadBuildPlan errs') =
execWriter $ mapM_ (checkDeps allPackages) $ mapToList bpPackages execWriter $ mapM_ (checkDeps allPackages) $ mapToList bpPackages
-- | For a given package name and plan, check that its dependencies are:
--
-- 1. Existent (existing in the provided package map)
-- 2. Within version range
checkDeps :: Map PackageName Version checkDeps :: Map PackageName Version
-> (PackageName, PackagePlan) -> (PackageName, PackagePlan)
-> Writer BadBuildPlan () -> Writer BadBuildPlan ()