[project @ 2005-03-15 16:15:46 by simonmar]
authorsimonmar <unknown>
Tue, 15 Mar 2005 16:15:46 +0000 (16:15 +0000)
committersimonmar <unknown>
Tue, 15 Mar 2005 16:15:46 +0000 (16:15 +0000)
TARGET->HOST

ghc/rts/Adjustor.c

index 3341c58..f6ea61c 100644 (file)
@@ -131,7 +131,7 @@ __asm__ (
 extern void obscure_ccall_ret_code(void);
 #endif
 
-#if defined(x86_64_TARGET_ARCH)
+#if defined(x86_64_HOST_ARCH)
 __asm__ (
    ".globl " UNDERSCORE "obscure_ccall_ret_code\n"
    UNDERSCORE "obscure_ccall_ret_code:\n\t"
@@ -238,7 +238,7 @@ void*
 createAdjustor(int cconv, StgStablePtr hptr,
               StgFunPtr wptr,
               char *typeString
-#if !defined(powerpc_HOST_ARCH) && !defined(powerpc64_HOST_ARCH) && !defined(x86_64_TARGET_ARCH)
+#if !defined(powerpc_HOST_ARCH) && !defined(powerpc64_HOST_ARCH) && !defined(x86_64_HOST_ARCH)
                  STG_UNUSED
 #endif
               )