From 5500fa8ff26e97cdd7112c51ab10266ec193dee4 Mon Sep 17 00:00:00 2001 From: ross Date: Fri, 28 Jan 2005 18:50:25 +0000 Subject: [PATCH] [project @ 2005-01-28 18:50:25 by ross] add missing underscores --- ghc/compiler/main/DriverPipeline.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/ghc/compiler/main/DriverPipeline.hs b/ghc/compiler/main/DriverPipeline.hs index 84b7a69..6674f14 100644 --- a/ghc/compiler/main/DriverPipeline.hs +++ b/ghc/compiler/main/DriverPipeline.hs @@ -1255,10 +1255,10 @@ doCpp dflags raw include_cc_opts input_fn output_fn = do | otherwise = SysTools.runCc dflags (SysTools.Option "-E" : args) let target_defs = - [ "-D" ++ HOST_OS ++ "BUILD_OS=1", - "-D" ++ HOST_ARCH ++ "BUILD_ARCH=1", - "-D" ++ TARGET_OS ++ "HOST_OS=1", - "-D" ++ TARGET_ARCH ++ "HOST_ARCH=1" ] + [ "-D" ++ HOST_OS ++ "_BUILD_OS=1", + "-D" ++ HOST_ARCH ++ "_BUILD_ARCH=1", + "-D" ++ TARGET_OS ++ "_HOST_OS=1", + "-D" ++ TARGET_ARCH ++ "_HOST_ARCH=1" ] -- remember, in code we *compile*, the HOST is the same our TARGET, -- and BUILD is the same as our HOST. -- 1.7.10.4