Merge pull request commercialhaskell#2532 from commercialhaskell/runghc

harendra-kumar · web-flow · commit b79dae1d554c · 2016-08-24T19:51:31.000+05:30
Use a supported way to pass ghc args via runghc
diff --git a/src/main/Main.hs b/src/main/Main.hs
@@ -770,7 +770,8 @@ execCmd ExecOpts {..} go@GlobalOpts{..} =
 
       getPkgOpts menv wc pkgs = do
           ids <- mapM (getPkgId menv wc) pkgs
-          return $ map ("-package-id " ++) ids
+          let pkgIdOpts x = ["--ghc-arg=-package-id", "--ghc-arg=" ++ x]
+          return $ concatMap pkgIdOpts ids
 
       getGhcCmd prefix menv pkgs args = do
           wc <- getWhichCompiler
