From 3c637fb76485e427492dde17ac3ccadb389d8c73 Mon Sep 17 00:00:00 2001
From: Kristen Kozak <grayjay@wordroute.com>
Date: Sat, 11 Nov 2017 17:38:04 -0800
Subject: [PATCH] Solver: Remove unused FailReason constructor.
---
cabal-install/Distribution/Solver/Modular/Message.hs | 1 -
cabal-install/Distribution/Solver/Modular/Tree.hs | 3 +--
2 files changed, 1 insertion(+), 3 deletions(-)
diff --git a/cabal-install/Distribution/Solver/Modular/Message.hs b/cabal-install/Distribution/Solver/Modular/Message.hs
index 1014a63b33..4cb40cee2a 100644
--- a/cabal-install/Distribution/Solver/Modular/Message.hs
+++ b/cabal-install/Distribution/Solver/Modular/Message.hs
@@ -124,7 +124,6 @@ showGR UserGoal = " (user goal)"
showGR (DependencyGoal dr) = " (dependency of " ++ showDependencyReason dr ++ ")"
showFR :: ConflictSet -> FailReason -> String
-showFR _ InconsistentInitialConstraints = " (inconsistent initial constraints)"
showFR _ (Conflicting ds) = " (conflict: " ++ L.intercalate ", " (L.map showDep ds) ++ ")"
showFR _ CannotInstall = " (only already installed instances can be used)"
showFR _ CannotReinstall = " (avoiding to reinstall a package with same version but new dependencies)"
diff --git a/cabal-install/Distribution/Solver/Modular/Tree.hs b/cabal-install/Distribution/Solver/Modular/Tree.hs
index b62d1a440b..a78a99631b 100644
--- a/cabal-install/Distribution/Solver/Modular/Tree.hs
+++ b/cabal-install/Distribution/Solver/Modular/Tree.hs
@@ -92,8 +92,7 @@ data Tree d c =
data POption = POption I (Maybe PackagePath)
deriving (Eq, Show)
-data FailReason = InconsistentInitialConstraints
- | Conflicting [LDep QPN]
+data FailReason = Conflicting [LDep QPN]
| CannotInstall
| CannotReinstall
| Shadowed
--
GitLab