import Distribution.Verbosity
import System.Cmd
import System.Environment
+import System.Info
main :: IO ()
main = do args <- getArgs
lbi <- getPersistBuildConfig
let -- XXX These are almighty hacks, shadowing the base
-- Setup.hs hacks
- extraExtraLibs = if pkgName (package pd) == "base"
+ extraExtraLibs = if (os == "mingw32") &&
+ (pkgName (package pd) == "base")
then ["wsock32", "msvcrt", "kernel32",
"user32", "shell32"]
else []