module Distribution.Solver.Types.LabeledPackageConstraint
( LabeledPackageConstraint(..)
, unlabelPackageConstraint
) where
import Distribution.Solver.Types.ConstraintSource
import Distribution.Solver.Types.PackageConstraint
data LabeledPackageConstraint
= LabeledPackageConstraint PackageConstraint ConstraintSource
unlabelPackageConstraint :: LabeledPackageConstraint -> PackageConstraint
unlabelPackageConstraint :: LabeledPackageConstraint -> PackageConstraint
unlabelPackageConstraint (LabeledPackageConstraint PackageConstraint
pc ConstraintSource
_) = PackageConstraint
pc