From 5cc9de10fd715cd52a2d3e67c2f65f012d575b7b Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Fri, 14 Aug 1998 11:01:57 +0000
Subject: [PATCH] [project @ 1998-08-14 11:01:57 by sof] Protect long long
 bits with HAVE_LONG_LONG

---
 ghc/includes/StgTypes.lh |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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.
-- 
1.7.10.4