@@ -38,6 +38,7 @@ import qualified Language.Haskell.LSP.Types as LSP
3838import Data.Aeson (ToJSON(toJSON))
3939import Development.IDE.Types.Logger (logDebug)
4040import Util
41+import System.IO (hPutStrLn, stderr)
4142
4243-- Prefix for the cache path
4344cacheDir :: 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