X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FLinker.c;h=7d49faacbe5b8387695645056de3d6631036d0fe;hb=ab5146287fd6f4a58a23e215414daa4ea48b8140;hp=e3782c14970bea9392cc7d241277acb918c38e9e;hpb=0ae11b0a28a482d1bf49b04899ca724ebf13026c;p=ghc-hetmet.git

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index e3782c1..7d49faa 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Linker.c,v 1.41 2001/05/16 09:40:11 sewardj Exp $
+ * $Id: Linker.c,v 1.42 2001/05/18 21:18:17 qrczak Exp $
  *
  * (c) The GHC Team, 2000
  *
@@ -153,6 +153,7 @@ typedef struct _RtsSymbolVal {
       Sym(stg_gc_f1)				\
       Sym(stg_gc_ut_1_0)			\
       Sym(stg_gc_ut_0_1)			\
+      Sym(stg_gc_unpt_r1)			\
       Sym(stg_gc_unbx_r1)			\
       Sym(stg_chk_0)				\
       Sym(stg_chk_1)				\