X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2Frts%2FTypes.h;h=18a3ce00fecf7120c828e874f6c5f1ea04a6eb66;hb=HEAD;hp=6f399e083d3697f774f1fbb1ee553abf60511bf8;hpb=a2a67cd520b9841114d69a87a423dabcb3b4368e;p=ghc-hetmet.git

diff --git a/includes/rts/Types.h b/includes/rts/Types.h
index 6f399e0..18a3ce0 100644
--- a/includes/rts/Types.h
+++ b/includes/rts/Types.h
@@ -1,27 +1,21 @@
 /* -----------------------------------------------------------------------------
  *
- * (c) The GHC Team, 1998-2008
+ * (c) The GHC Team, 1998-2009
  *
  * RTS-specific types.
  *
+ * 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
+ *
  * ---------------------------------------------------------------------------*/
 
-/* -------------------------------------------------------------------------
-   Generally useful typedefs
-   ------------------------------------------------------------------------- */
-
 #ifndef RTS_TYPES_H
 #define RTS_TYPES_H
 
 typedef unsigned int  nat;           /* at least 32 bits (like int) */
 typedef unsigned long lnat;          /* at least 32 bits            */
-#ifndef _MSC_VER
-typedef unsigned long long ullong;   /* at least 32 bits            */
-typedef long long llong;
-#else
-typedef unsigned __int64   ullong;   /* at least 32 bits            */
-typedef __int64 llong;
-#endif
 
 /* ullong (64|128-bit) type: only include if needed (not ANSI) */
 #if defined(__GNUC__)