Commit 5500fa8f authored by ross's avatar ross
Browse files

[project @ 2005-01-28 18:50:25 by ross]

add missing underscores
parent c51fdf44
......@@ -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.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment