Skip to content

Commit 164f456

Browse files
committed
Add a dummy test case
1 parent b1087a5 commit 164f456

File tree

2 files changed

+9
-2
lines changed

2 files changed

+9
-2
lines changed

hls-test-utils/src/Test/Hls/Util.hs

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -112,10 +112,13 @@ data GhcVersion
112112
| GHC88
113113
| GHC86
114114
| GHC84
115+
| GHC901
115116
deriving (Eq,Show)
116117

117118
ghcVersion :: GhcVersion
118-
#if (defined(MIN_VERSION_GLASGOW_HASKELL) && (MIN_VERSION_GLASGOW_HASKELL(8,10,0,0)))
119+
#if (defined(MIN_VERSION_GLASGOW_HASKELL) && (MIN_VERSION_GLASGOW_HASKELL(9,0,1,0)))
120+
ghcVersion = GHC901
121+
#elif (defined(MIN_VERSION_GLASGOW_HASKELL) && (MIN_VERSION_GLASGOW_HASKELL(8,10,0,0)))
119122
ghcVersion = GHC810
120123
#elif (defined(MIN_VERSION_GLASGOW_HASKELL) && (MIN_VERSION_GLASGOW_HASKELL(8,8,0,0)))
121124
ghcVersion = GHC88

plugins/hls-eval-plugin/test/Main.hs

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -20,7 +20,11 @@ import System.FilePath ((</>))
2020
import Test.Hls
2121

2222
main :: IO ()
23-
main = defaultTestRunner tests
23+
main = defaultTestRunner $ if ghcVersion == GHC901 then tests else dummyTestCase
24+
25+
-- | Now we only maintain test cases for GHC 9.0.1
26+
dummyTestCase :: TestTree
27+
dummyTestCase = testCase "Tests are skipped before GHC 9.0.1" $ pure ()
2428

2529
evalPlugin :: PluginDescriptor IdeState
2630
evalPlugin = Eval.descriptor "eval"

0 commit comments

Comments
 (0)