From: sof <unknown>
Date: Fri, 14 Aug 1998 11:01:57 +0000 (+0000)
Subject: [project @ 1998-08-14 11:01:57 by sof]
X-Git-Tag: Approx_2487_patches~434
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=5cc9de10fd715cd52a2d3e67c2f65f012d575b7b;p=ghc-hetmet.git

[project @ 1998-08-14 11:01:57 by sof]
Protect long long bits with HAVE_LONG_LONG
---

diff --git a/ghc/includes/StgTypes.lh b/ghc/includes/StgTypes.lh
index 7c4d717..553cd46 100644
--- a/ghc/includes/StgTypes.lh
+++ b/ghc/includes/StgTypes.lh
@@ -85,7 +85,7 @@ typedef unsigned long  *StgPtr;		/* StgPtr is a ptr to a heap object
 typedef StgPtr	       *StgPtrPtr;	/* used for A stack pointer */
 typedef long		StgInt;
 
-#if __GNUC__
+#if HAVE_LONG_LONG
 /* These types are only used to allow the passing of
    64-bit ints from Haskell to ccalls and to ease
    the implementation of the Int64 and Word64 libraries.