X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Flib%2Fcompat%2FCompat%2FRawSystem.hs;h=f0f8aa3ac7175d4cdca3b4af8450cf01d0021266;hb=153b9cb9b11e05c4edb1b6bc0a7b972660e41f70;hp=2d88c293bccf84b8dadd7efca518367618935457;hpb=e1c6e73ee529c1fa95ca85e6999319949a8f2991;p=ghc-hetmet.git

diff --git a/ghc/lib/compat/Compat/RawSystem.hs b/ghc/lib/compat/Compat/RawSystem.hs
index 2d88c29..f0f8aa3 100644
--- 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 ->