summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorIan Lynagh <igloo@earth.li>2010-07-14 18:47:15 +0000
committerIan Lynagh <igloo@earth.li>2010-07-14 18:47:15 +0000
commit75fea0db6f7d187aea994485a9b85c4d2b44fb83 (patch)
tree7fdb36780050e9f777ba1471f774aa307b04bbc5
parent1c59af0bf4fbd699aafd71082e6ba6d373b59c23 (diff)
downloadhaskell-75fea0db6f7d187aea994485a9b85c4d2b44fb83.tar.gz
Change some TARGET checks to HOST checks
-rw-r--r--includes/RtsAPI.h2
-rw-r--r--includes/stg/DLL.h4
-rw-r--r--includes/stg/TailCalls.h4
3 files changed, 5 insertions, 5 deletions
diff --git a/includes/RtsAPI.h b/includes/RtsAPI.h
index 98bf7305fd..1444dbc3c5 100644
--- a/includes/RtsAPI.h
+++ b/includes/RtsAPI.h
@@ -169,7 +169,7 @@ rts_getSchedStatus (Capability *cap);
// Note that RtsAPI.h is also included by foreign export stubs in
// the base package itself.
//
-#if defined(mingw32_TARGET_OS) && defined(__PIC__) && !defined(COMPILING_BASE_PACKAGE)
+#if defined(mingw32_HOST_OS) && defined(__PIC__) && !defined(COMPILING_BASE_PACKAGE)
__declspec(dllimport) extern StgWord base_GHCziTopHandler_runIO_closure[];
__declspec(dllimport) extern StgWord base_GHCziTopHandler_runNonIO_closure[];
#else
diff --git a/includes/stg/DLL.h b/includes/stg/DLL.h
index 245bcd1fbd..7d4096025d 100644
--- a/includes/stg/DLL.h
+++ b/includes/stg/DLL.h
@@ -14,7 +14,7 @@
#ifndef __STGDLL_H__
#define __STGDLL_H__ 1
-#if defined(__PIC__) && defined(mingw32_TARGET_OS)
+#if defined(__PIC__) && defined(mingw32_HOST_OS)
# define DLL_IMPORT_DATA_REF(x) (_imp__##x)
# define DLL_IMPORT_DATA_VARNAME(x) *_imp__##x
# if __GNUC__ && !defined(__declspec)
@@ -45,7 +45,7 @@
#else
#define DLL_IMPORT
#define DLL_IMPORT_RTS DLLIMPORT
-# if defined(__PIC__) && defined(mingw32_TARGET_OS)
+# if defined(__PIC__) && defined(mingw32_HOST_OS)
# define DLL_IMPORT_DATA_VAR(x) _imp__##x
# else
# define DLL_IMPORT_DATA_VAR(x) x
diff --git a/includes/stg/TailCalls.h b/includes/stg/TailCalls.h
index bffd39c674..40c7ce73a3 100644
--- a/includes/stg/TailCalls.h
+++ b/includes/stg/TailCalls.h
@@ -182,7 +182,7 @@ but uses $$dyncall if necessary to cope, just in case you aren't.
-------------------------------------------------------------------------- */
-#ifdef hppa1_1_hp_hpux_TARGET
+#ifdef hppa1_1_hp_hpux_HOST
#define JMP_(cont) \
do { void *_procedure = (void *)(cont); \
@@ -191,7 +191,7 @@ but uses $$dyncall if necessary to cope, just in case you aren't.
goto *_procedure; \
} while(0)
-#endif /* hppa1_1_hp_hpux_TARGET */
+#endif /* hppa1_1_hp_hpux_HOST */
/* -----------------------------------------------------------------------------
Tail calling on PowerPC