Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
Packages
Cabal
Commits
825e9cba
Commit
825e9cba
authored
May 29, 2008
by
Duncan Coutts
Browse files
Use thisPackageVersion and notThisPackageVersion from Distribution.Package
rather than the local definitions
parent
4a63fb49
Changes
1
Hide whitespace changes
Inline
Side-by-side
cabal-install/Hackage/Dependency/TopDown.hs
View file @
825e9cba
...
...
@@ -31,14 +31,12 @@ import qualified Distribution.Simple.PackageIndex as PackageIndex
import
Distribution.Simple.PackageIndex
(
PackageIndex
)
import
Distribution.InstalledPackageInfo
(
InstalledPackageInfo
)
import
Distribution.Package
(
PackageIdentifier
(
Package
Identifier
),
Dependency
(
Dependency
)
,
Package
(
..
),
p
ackageVersion
)
(
PackageIdentifier
,
Package
(
packageId
),
packageVersion
,
Dependency
(
Dependency
),
thisPackageVersion
,
notThisP
ackageVersion
)
import
Distribution.PackageDescription
(
PackageDescription
(
buildDepends
)
)
import
Distribution.PackageDescription.Configuration
(
finalizePackageDescription
)
import
Distribution.Version
(
VersionRange
(
..
)
)
import
Distribution.Compiler
(
CompilerId
)
import
Distribution.System
...
...
@@ -257,9 +255,6 @@ addPackageSelectConstraint pkgid constraints =
dep
=
TaggedDependency
NoInstalledConstraint
(
thisPackageVersion
pkgid
)
reason
=
SelectedOther
pkgid
thisPackageVersion
::
PackageIdentifier
->
Dependency
thisPackageVersion
(
PackageIdentifier
n
v
)
=
Dependency
n
(
ThisVersion
v
)
addPackageExcludeConstraint
::
PackageIdentifier
->
Constraints
->
Satisfiable
Constraints
ExclusionReason
addPackageExcludeConstraint
pkgid
constraints
=
...
...
@@ -268,9 +263,6 @@ addPackageExcludeConstraint pkgid constraints =
dep
=
TaggedDependency
NoInstalledConstraint
(
notThisPackageVersion
pkgid
)
reason
=
ExcludedByConfigureFail
notThisPackageVersion
(
PackageIdentifier
n
v
)
=
Dependency
n
(
notThisVersion
v
)
notThisVersion
v
=
UnionVersionRanges
(
EarlierVersion
v
)
(
LaterVersion
v
)
addPackageDependencyConstraint
::
PackageIdentifier
->
TaggedDependency
->
Constraints
->
Satisfiable
Constraints
ExclusionReason
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment