File tree Expand file tree Collapse file tree 1 file changed +5
-2
lines changed
plugins/hls-refactor-plugin/test Expand file tree Collapse file tree 1 file changed +5
-2
lines changed Original file line number Diff line number Diff line change @@ -1459,7 +1459,7 @@ extendImportTests = testGroup "extend import actions"
1459
1459
, " import A (pattern Some)"
1460
1460
, " k (Some x) = x"
1461
1461
])
1462
- , ignoreForGHC92 " Diagnostic message has no suggestions" $
1462
+ , ignoreFor ( BrokenForGHC [ GHC92 , GHC94 ]) " Diagnostic message has no suggestions" $
1463
1463
testSession " type constructor name same as data constructor name" $ template
1464
1464
[(" ModuleA.hs" , T. unlines
1465
1465
[ " module ModuleA where"
@@ -3323,7 +3323,7 @@ exportUnusedTests = testGroup "export unused actions"
3323
3323
(R 2 0 2 11 )
3324
3324
" Export ‘bar’"
3325
3325
Nothing
3326
- , ignoreForGHC92 " Diagnostic message has no suggestions" $
3326
+ , ignoreFor ( BrokenForGHC [ GHC92 , GHC94 ]) " Diagnostic message has no suggestions" $
3327
3327
testSession " type is exported but not the constructor of same name" $ template
3328
3328
(T. unlines
3329
3329
[ " {-# OPTIONS_GHC -Wunused-top-binds #-}"
@@ -3958,6 +3958,9 @@ withTempDir f = System.IO.Extra.withTempDir $ \dir -> do
3958
3958
ignoreForGHC92 :: String -> TestTree -> TestTree
3959
3959
ignoreForGHC92 = ignoreFor (BrokenForGHC [GHC92 ])
3960
3960
3961
+ ignoreForGHC94 :: String -> TestTree -> TestTree
3962
+ ignoreForGHC94 = ignoreFor (BrokenForGHC [GHC94 ])
3963
+
3961
3964
data BrokenTarget =
3962
3965
BrokenSpecific OS [GhcVersion ]
3963
3966
-- ^ Broken for `BrokenOS` with `GhcVersion`
You can’t perform that action at this time.
0 commit comments