Skip to content

Commit d54fd38

Browse files
authored
Log cache dir (#567)
1 parent cd6f62b commit d54fd38

File tree

1 file changed

+3
-0
lines changed

1 file changed

+3
-0
lines changed

exe/Rules.hs

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -38,6 +38,7 @@ import qualified Language.Haskell.LSP.Types as LSP
3838
import Data.Aeson (ToJSON(toJSON))
3939
import Development.IDE.Types.Logger (logDebug)
4040
import Util
41+
import System.IO (hPutStrLn, stderr)
4142

4243
-- Prefix for the cache path
4344
cacheDir :: String
@@ -122,6 +123,8 @@ createSession (ComponentOptions theOpts _) = do
122123

123124
cacheDir <- getCacheDir theOpts
124125

126+
hPutStrLn stderr $ "Interface files cache dir: " <> cacheDir
127+
125128
runGhc (Just libdir) $ do
126129
dflags <- getSessionDynFlags
127130
(dflags', _targets) <- addCmdOpts theOpts dflags

0 commit comments

Comments
 (0)