From 04e294bda9f5127d3d5f09d20491e52b7f796d7a Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 7 Mar 2005 12:20:28 +0000
Subject: [PATCH] [project @ 2005-03-07 12:20:28 by simonmar] Add missing hs_*
 symbols

---
 ghc/rts/Linker.c |    9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c
index 7b9df7f..4fb0ed6 100644
--- a/ghc/rts/Linker.c
+++ b/ghc/rts/Linker.c
@@ -425,7 +425,14 @@ typedef struct _RtsSymbolVal {
       SymX(genericRaise)			\
       SymX(getProgArgv)				\
       SymX(getStablePtr)			\
-      SymX(initLinker)  			\
+      SymX(hs_init)				\
+      SymX(hs_exit)				\
+      SymX(hs_set_argv)				\
+      SymX(hs_add_root)				\
+      SymX(hs_perform_gc)			\
+      SymX(hs_free_stable_ptr)			\
+      SymX(hs_free_fun_ptr)			\
+      SymX(initLinker)				\
       SymX(int2Integerzh_fast)			\
       SymX(integer2Intzh_fast)			\
       SymX(integer2Wordzh_fast)			\
-- 
1.7.10.4