From: simonmar <unknown>
Date: Wed, 17 Jul 2002 08:26:44 +0000 (+0000)
Subject: [project @ 2002-07-17 08:26:44 by simonmar]
X-Git-Tag: Approx_11550_changesets_converted~1842
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=e9148ae054276154c9628d393d215d2554bf33b9;p=ghc-hetmet.git

[project @ 2002-07-17 08:26:44 by simonmar]
oops, missed one instance of __stginit_GHCziPrim (I killed it yesterday)
---

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index 5c0ea52..e6bcb7e 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Linker.c,v 1.98 2002/07/08 14:38:26 simonpj Exp $
+ * $Id: Linker.c,v 1.99 2002/07/17 08:26:44 simonmar Exp $
  *
  * (c) The GHC Team, 2000, 2001
  *
@@ -24,6 +24,9 @@
 #include <sys/types.h>
 #endif
 
+#include <stdlib.h>
+#include <string.h>
+
 #ifdef HAVE_SYS_STAT_H
 #include <sys/stat.h>
 #endif
@@ -285,7 +288,6 @@ typedef struct _RtsSymbolVal {
       Maybe_ForeignObj				\
       Maybe_Stable_Names			\
       Sym(StgReturn)				\
-      Sym(__stginit_GHCziPrim)			\
       Sym(init_stack)				\
       SymX(__stg_chk_0)				\
       SymX(__stg_chk_1)				\