[project @ 2005-01-28 12:55:17 by simonmar]

[ghc-hetmet.git] / ghc / lib / compat / Compat / RawSystem.hs

diff --git a/ghc/lib/compat/Compat/RawSystem.hs b/ghc/lib/compat/Compat/RawSystem.hs
index 2d88c29..f0f8aa3 100644 (file)
--- a/ghc/lib/compat/Compat/RawSystem.hs
+++ b/ghc/lib/compat/Compat/RawSystem.hs
@@ -16,6 +16,8 @@
 
 module Compat.RawSystem (rawSystem) where
 
+#include "../../includes/ghcconfig.h"
+
 #if __GLASGOW_HASKELL__ >= 603
 
 import System.Cmd (rawSystem)
@@ -99,7 +101,7 @@ use lpCommandLine alone, which CreateProcess supports.
 
 ----------------------------------------------------------------------------- -}
 
-#ifndef mingw32_TARGET_OS
+#ifndef mingw32_HOST_OS
 
 rawSystem cmd args =
   withCString cmd $ \pcmd ->