From a67490b656a001806c09436acdfce80bf4903f57 Mon Sep 17 00:00:00 2001 From: Chris Wendt Date: Thu, 1 Aug 2019 01:05:17 -0600 Subject: [PATCH] Log OS in hie-wrapper --- app/HieWrapper.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/app/HieWrapper.hs b/app/HieWrapper.hs index 12972a3c9..dc38c1fec 100644 --- a/app/HieWrapper.hs +++ b/app/HieWrapper.hs @@ -22,6 +22,7 @@ import System.Directory import System.Environment import qualified System.Log.Logger as L import System.Process +import System.Info -- --------------------------------------------------------------------- @@ -70,6 +71,7 @@ run opts = do logm $ "run entered for hie-wrapper(" ++ progName ++ ") " ++ version d <- getCurrentDirectory logm $ "Current directory:" ++ d + logm $ "Operating system:" ++ os -- Get the cabal directory from the ghc-mod cradle (mcr,_) <- GM.runGhcModT GM.defaultOptions GM.cradle