From: qrczak <unknown>
Date: Tue, 17 Jul 2001 03:53:25 +0000 (+0000)
Subject: [project @ 2001-07-17 03:53:25 by qrczak]
X-Git-Tag: Approximately_9120_patches~1530
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=05591cec532277c0c963579f9ff3c6baf5fa1592;hp=fc2b5fcd34bef3a643727466e3bdb874304ab5c3;p=ghc-hetmet.git

[project @ 2001-07-17 03:53:25 by qrczak]
Long long functions are no longer in the rts.
---

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index 10423a1..43bd030 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Linker.c,v 1.49 2001/06/29 16:17:28 sewardj Exp $
+ * $Id: Linker.c,v 1.50 2001/07/17 03:53:25 qrczak Exp $
  *
  * (c) The GHC Team, 2000
  *
@@ -331,41 +331,6 @@ typedef struct _RtsSymbolVal {
 #define RTS_LONG_LONG_SYMS /* nothing */
 #else
 #define RTS_LONG_LONG_SYMS			\
-      SymX(stg_gtWord64)			\
-      SymX(stg_geWord64)			\
-      SymX(stg_eqWord64)			\
-      SymX(stg_neWord64)			\
-      SymX(stg_ltWord64)			\
-      SymX(stg_leWord64)			\
-      SymX(stg_gtInt64)				\
-      SymX(stg_geInt64)				\
-      SymX(stg_eqInt64)				\
-      SymX(stg_neInt64)				\
-      SymX(stg_ltInt64)				\
-      SymX(stg_leInt64)				\
-      SymX(stg_remWord64)			\
-      SymX(stg_quotWord64)			\
-      SymX(stg_remInt64)			\
-      SymX(stg_quotInt64)			\
-      SymX(stg_negateInt64)			\
-      SymX(stg_plusInt64)			\
-      SymX(stg_minusInt64)			\
-      SymX(stg_timesInt64)			\
-      SymX(stg_and64)				\
-      SymX(stg_or64)				\
-      SymX(stg_xor64)				\
-      SymX(stg_not64)				\
-      SymX(stg_shiftL64)			\
-      SymX(stg_shiftRL64)			\
-      SymX(stg_iShiftL64)			\
-      SymX(stg_iShiftRL64)			\
-      SymX(stg_iShiftRA64)			\
-      SymX(stg_intToInt64)			\
-      SymX(stg_int64ToInt)			\
-      SymX(stg_int64ToWord64)			\
-      SymX(stg_wordToWord64)			\
-      SymX(stg_word64ToWord)			\
-      SymX(stg_word64ToInt64) 			\
       SymX(int64ToIntegerzh_fast)		\
       SymX(word64ToIntegerzh_fast)
 #endif /* SUPPORT_LONG_LONGS */