Skip to content

Commit daaf270

Browse files
committed
Synced cabal-install-solver's list & Simplify testcase
1 parent ed80f71 commit daaf270

File tree

2 files changed

+8
-7
lines changed
  • cabal-install/tests/UnitTests/Distribution/Solver/Modular
  • cabal-install-solver/src/Distribution/Solver/Modular

2 files changed

+8
-7
lines changed

cabal-install-solver/src/Distribution/Solver/Modular/Solver.hs

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -162,7 +162,11 @@ solve sc cinfo idx pkgConfigDB userPrefs userConstraints userGoals =
162162
nonInstallable =
163163
L.map mkPackageName
164164
[ "base"
165+
, "ghc-bignum"
165166
, "ghc-prim"
167+
, "ghc-boot"
168+
, "ghc"
169+
, "ghci"
166170
, "integer-gmp"
167171
, "integer-simple"
168172
, "template-haskell"

cabal-install/tests/UnitTests/Distribution/Solver/Modular/Solver.hs

Lines changed: 4 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1130,13 +1130,10 @@ dbBase = [
11301130
]
11311131

11321132
dbNonupgrade :: ExampleDb
1133-
dbNonupgrade =
1134-
let base = exInst "base" 1 "base-1" []
1135-
in [
1136-
Left base
1137-
, Left $ exInst "ghc" 1 "ghc-1" [base]
1138-
, Left $ exInst "ghci" 1 "ghci-1" [base]
1139-
, Left $ exInst "ghc-boot" 1 "ghc-boot-1" [base]
1133+
dbNonupgrade = [
1134+
Left $ exInst "ghc" 1 "ghc-1" []
1135+
, Left $ exInst "ghci" 1 "ghci-1" []
1136+
, Left $ exInst "ghc-boot" 1 "ghc-boot-1" []
11401137
, Right $ exAv "ghc" 2 [ExFix "base" 1]
11411138
, Right $ exAv "ghci" 2 [ExFix "base" 1]
11421139
, Right $ exAv "ghc-boot" 2 [ExFix "base" 1]

0 commit comments

Comments
 (0)