Pass along RTS args from wrapper to HLS.

haskell · Sep 21, 2021 · e9ea4f7 · e9ea4f7
1 parent 48221c7
commit e9ea4f7
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/exe/Wrapper.hs b/exe/Wrapper.hs
@@ -9,6 +9,7 @@ import           Data.Foldable
 import           Data.List
 import           Data.Void
 import qualified Development.IDE.Session as Session
+import           GHC.Environment
 import qualified HIE.Bios.Environment    as HieBios
 import           HIE.Bios.Types
 import           Ide.Arguments
@@ -72,7 +73,7 @@ launchHaskellLanguageServer parsedArgs = do
                      ++ hlsVersion
   hPutStrLn stderr $ "Current directory: " ++ d
   hPutStrLn stderr $ "Operating system: " ++ os
-  args <- getArgs
+  args <- getFullArgs
   hPutStrLn stderr $ "Arguments: " ++ show args
   hPutStrLn stderr $ "Cradle directory: " ++ cradleRootDir cradle
   hPutStrLn stderr $ "Cradle type: " ++ show (actionName (cradleOptsProg cradle))