X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2Fstg%2FDLL.h;h=7d4096025da916ca09f194a9de398495777b1760;hb=75fea0db6f7d187aea994485a9b85c4d2b44fb83;hp=5e824271bf415a371de7423146933cb6aca469c9;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;p=ghc-hetmet.git

diff --git a/includes/stg/DLL.h b/includes/stg/DLL.h
index 5e82427..7d40960 100644
--- a/includes/stg/DLL.h
+++ b/includes/stg/DLL.h
@@ -1,7 +1,20 @@
+/* -----------------------------------------------------------------------------
+ *
+ * (c) The GHC Team, 1998-2009
+ *
+ * Support for Windows DLLs.
+ *
+ * Do not #include this file directly: #include "Rts.h" instead.
+ *
+ * To understand the structure of the RTS headers, see the wiki:
+ *   http://hackage.haskell.org/trac/ghc/wiki/Commentary/SourceTree/Includes
+ *
+ * ---------------------------------------------------------------------------*/
+
 #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)
@@ -32,13 +45,14 @@
 #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
 # endif
 #endif
 
+
 #ifdef COMPILING_STDLIB
 #define DLL_IMPORT_STDLIB
 #else