Skip to content

Commit c434319

Browse files
Take HLint's suggestion: demand that GHC not inline hlsCommand.
1 parent 18ef09a commit c434319

File tree

1 file changed

+1
-2
lines changed

1 file changed

+1
-2
lines changed

test/utils/Test/Hls/Util.hs

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -126,14 +126,13 @@ ignoreForGhcVersions vers reason
126126
logFilePath :: String
127127
logFilePath = "hls-" ++ show ghcVersion ++ ".log"
128128

129-
{- HLINT ignore hlsCommand "Missing NOINLINE pragma" -}
130-
131129
-- | The command to execute the version of hls for the current compiler.
132130
--
133131
-- Both @stack test@ and @cabal new-test@ setup the environment so @hls@ is
134132
-- on PATH. Cabal seems to respond to @build-tool-depends@ specifically while
135133
-- stack just puts all project executables on PATH.
136134
hlsCommand :: String
135+
{-# NOINLINE hlsCommand #-}
137136
hlsCommand = unsafePerformIO $ do
138137
testExe <- fromMaybe "haskell-language-server" <$> lookupEnv "HLS_TEST_EXE"
139138
pure $ testExe ++ " --lsp -d -j2 -l test-logs/" ++ logFilePath

0 commit comments

Comments
 (0)