ats-pkg 3.0.0.4 → 3.0.0.10

raw patch · 5 files changed

+6/−6 lines, 5 files

Files

• ats-pkg.cabal +1/−1
• dhall/atspkg-prelude.dhall +1/−0
• internal/Quaalude.cpphs +2/−3
• man/atspkg.1 +1/−1
• src/Language/ATS/Package/PackageSet.hs +1/−1

@@ -1,6 +1,6 @@ cabal-version: 2.0 name: ats-pkg-version: 3.0.0.4+version: 3.0.0.10 license: BSD3 license-file: LICENSE copyright: Copyright: (c) 2018 Vanessa McHale

@@ -306,6 +306,7 @@ , plainDeps = plainDeps , lowerDeps = lowerDeps , upperDeps = upperDeps+, eqDeps = eqDeps , mapPlainDeps = mapPlainDeps , src = src , mapSrc = mapSrc

@@ -172,9 +172,8 @@ makeExecutable = flip setFileMode ownerModes #endif -nubSpecial :: (Ord a) => [[a]] -> [[a]]-nubSpecial = pure . rmDups . join-    where rmDups = fmap head . group . sort+nubSpecial :: (Eq a) => [[a]] -> [[a]]+nubSpecial = fmap pure . nub . join  makeExe :: String makeExe = case os of

@@ -1,4 +1,4 @@-.\" Automatically generated by Pandoc 2.2.1+.\" Automatically generated by Pandoc 2.2.2 .\" .TH "atspkg (1)" "" "" "" "" .hy

@@ -71,7 +71,7 @@             -> ATSPackageSet             -> [(String, ATSConstraint)]             -> DepM [[ATSDependency]]-mkBuildPlan getDeps aps@(ATSPackageSet ps) names = finalize . fmap (nubSpecial) . resolve . fmap (selfDepend . asDep getDeps) <=< stringBuildPlan $ names+mkBuildPlan getDeps aps@(ATSPackageSet ps) names = finalize . fmap nubSpecial . resolve . fmap (selfDepend . asDep getDeps) <=< stringBuildPlan $ names     where finalize = fmap (fmap (fmap (lookupVersions aps)))           resolve = resolveDependencies (atsPkgsToPkgs libDeps aps)           selfDepend (Dependency ln ds v) = case lookup ln names of