From: simonmar <unknown>
Date: Fri, 20 Aug 2004 13:05:50 +0000 (+0000)
Subject: [project @ 2004-08-20 13:05:50 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~1706
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=7362b932471c47be996b330a79f8f4545b59e4b2

[project @ 2004-08-20 13:05:50 by simonmar]
Fixes
---

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index e6e82aa..12fd913 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -515,6 +515,7 @@ typedef struct _RtsSymbolVal {
       SymX(stg_INTLIKE_closure)			\
       SymX(stg_MUT_ARR_PTRS_FROZEN_info)	\
       SymX(stg_WEAK_info)                       \
+      SymX(stg_ap_0_info)			\
       SymX(stg_ap_v_info)			\
       SymX(stg_ap_f_info)			\
       SymX(stg_ap_d_info)			\
@@ -641,6 +642,7 @@ RTS_LIBGCC_SYMBOLS
 
 static RtsSymbolVal rtsSyms[] = {
       RTS_SYMBOLS
+      RTS_RET_SYMBOLS
       RTS_LONG_LONG_SYMS
       RTS_POSIX_ONLY_SYMBOLS
       RTS_MINGW_ONLY_SYMBOLS