File tree Expand file tree Collapse file tree 2 files changed +6
-2
lines changed Expand file tree Collapse file tree 2 files changed +6
-2
lines changed Original file line number Diff line number Diff line change @@ -48,6 +48,8 @@ test_all_hls() {
4848 fi
4949 fi
5050 done
51+ # install the recommended GHC version so the wrapper can launch HLS
52+ ghcup install ghc --set recommended
5153 " $bindir /haskell-language-server-wrapper${ext} " typecheck " ${test_module} " || fail " failed to typecheck with HLS wrapper"
5254}
5355
Original file line number Diff line number Diff line change @@ -99,8 +99,10 @@ main = do
9999 Left err -> do
100100 T. hPutStrLn stderr (prettyError err NoShorten )
101101 case args of
102- Ghcide _ -> launchErrorLSP recorder (prettyError err Shorten )
103- _ -> pure ()
102+ Ghcide (GhcideArguments { argsCommand = Main. LSP }) ->
103+ launchErrorLSP recorder (prettyError err Shorten )
104+
105+ _ -> exitFailure
104106
105107launchHaskellLanguageServer :: Recorder (WithPriority (Doc () )) -> Arguments -> IO (Either WrapperSetupError () )
106108launchHaskellLanguageServer recorder parsedArgs = do
You can’t perform that action at this time.
0 commit comments