From a2fb599c0d93884d91df385e36abc81bd4ee42cd Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 3 Jun 2002 23:36:40 +0000
Subject: [PATCH] [project @ 2002-06-03 23:36:40 by sof] whether or not to
 quote -D and -U opts is a property of the host, not target
 OS

---
 ghc/compiler/main/DriverFlags.hs |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/compiler/main/DriverFlags.hs b/ghc/compiler/main/DriverFlags.hs
index 10551a2..e480c8a 100644
--- a/ghc/compiler/main/DriverFlags.hs
+++ b/ghc/compiler/main/DriverFlags.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: DriverFlags.hs,v 1.95 2002/06/03 13:08:37 matthewc Exp $
+-- $Id: DriverFlags.hs,v 1.96 2002/06/03 23:36:40 sof Exp $
 --
 -- Driver flags
 --
@@ -356,7 +356,7 @@ dynamic_flags = [
 	-- on all other systems, quoting is necessary, to avoid interpretation
 	-- of shell metacharacters in the arguments (e.g. green-card's
 	-- -DBEGIN_GHC_ONLY='}-' trick).
-#ifndef mingw32_TARGET_OS
+#ifndef mingw32_HOST_OS
   ,  ( "D",		Prefix (\s -> addOpt_P ("-D'"++s++"'") ) )
   ,  ( "U",		Prefix (\s -> addOpt_P ("-U'"++s++"'") ) )
 #else
-- 
1.7.10.4