@@ -208,7 +208,7 @@ tests =
208
208
solverSuccess [(" base" , 1 ), (" ghc-prim" , 1 ), (" integer-gmp" , 1 ), (" integer-simple" , 1 )]
209
209
, runTest $
210
210
mkTest dbNonupgrade " Refuse to install newer ghc requested by another library" [" A" ] $
211
- solverFailure (isInfixOf " rejecting: ghc-2 .0.0 (constraint from non-reinstallable package requires installed instance )" )
211
+ solverFailure (isInfixOf " rejecting: ghc-1 .0.0/installed-1 (conflict: A => ghc==2.0.0 )" )
212
212
]
213
213
, testGroup
214
214
" reject-unconstrained"
@@ -623,7 +623,7 @@ tests =
623
623
, " [__2] unknown package: unknown2 (dependency of B)"
624
624
, " [__2] fail (backjumping, conflict set: B, unknown2)"
625
625
, " [__1] fail (backjumping, conflict set: A, B, unknown1, unknown2)"
626
- , " [__0] skipping: A; 3 .0.0, 2 .0.0 (has the same characteristics that "
626
+ , " [__0] skipping: A; 2 .0.0, 3 .0.0 (has the same characteristics that "
627
627
++ " caused the previous version to fail: depends on 'B')"
628
628
, " [__0] trying: A-1.0.0"
629
629
, " [__1] done"
@@ -652,7 +652,7 @@ tests =
652
652
, " [__1] next goal: B (dependency of A)"
653
653
, " [__1] rejecting: B-11.0.0 (conflict: A => B==14.0.0)"
654
654
, " [__1] fail (backjumping, conflict set: A, B)"
655
- , " [__0] skipping: A; 3 .0.0, 2 .0.0 (has the same characteristics that "
655
+ , " [__0] skipping: A; 2 .0.0, 3 .0.0 (has the same characteristics that "
656
656
++ " caused the previous version to fail: depends on 'B' but excludes "
657
657
++ " version 11.0.0)"
658
658
, " [__0] trying: A-1.0.0"
@@ -777,7 +777,7 @@ tests =
777
777
, " [__2] next goal: C (dependency of A)"
778
778
, " [__2] rejecting: C-2.0.0 (conflict: A => C==1.0.0)"
779
779
, " [__2] fail (backjumping, conflict set: A, C)"
780
- , " [__0] skipping: A; 3 .0.0, 2 .0.0 (has the same characteristics that caused the "
780
+ , " [__0] skipping: A; 2 .0.0, 3 .0.0 (has the same characteristics that caused the "
781
781
++ " previous version to fail: depends on 'C' but excludes version 2.0.0)"
782
782
, " [__0] trying: A-1.0.0"
783
783
, " [__1] next goal: C (dependency of A)"
@@ -950,7 +950,7 @@ tests =
950
950
, Right $ exAv " B" 1 [ExFix " A" 4 ]
951
951
]
952
952
rejecting = " rejecting: A-3.0.0"
953
- skipping = " skipping: A; 2 .0.0, 1 .0.0"
953
+ skipping = " skipping: A; 1 .0.0, 2 .0.0"
954
954
in mkTest db " show skipping versions list" [" B" ] $
955
955
solverFailure (\ msg -> rejecting `isInfixOf` msg && skipping `isInfixOf` msg)
956
956
, runTest $
@@ -961,7 +961,7 @@ tests =
961
961
, Right $ exAv " B" 1 [ExFix " A" 4 ]
962
962
]
963
963
rejecting = " rejecting: A-3.0.0/installed-3.0.0"
964
- skipping = " skipping: A; 2 .0.0/installed-2 .0.0, 1 .0.0/installed-1 .0.0"
964
+ skipping = " skipping: A; 1 .0.0/installed-1 .0.0, 2 .0.0/installed-2 .0.0 "
965
965
in mkTest db " show skipping versions list, installed" [" B" ] $
966
966
solverFailure (\ msg -> rejecting `isInfixOf` msg && skipping `isInfixOf` msg)
967
967
]
0 commit comments