From eb3451b45e678fd8640df8a731d910213efdeaa8 Mon Sep 17 00:00:00 2001 From: qrczak Date: Sun, 28 Jan 2001 20:53:38 +0000 Subject: [PATCH] [project @ 2001-01-28 20:53:38 by qrczak] Added rts symbols to the list: stg_sig_install, nocldstop, createAdjustor, rts_mkInt, rts_mkStablePtr, rts_apply, rts_evalIO, rts_checkSchedStatus, rts_getInt, stg_sel_13_upd_info, stg_sel_14_upd_info, stg_sel_15_upd_info. Could the list be somehow generated automatically? --- ghc/rts/Linker.c | 16 ++++++++++++++-- 1 file changed, 14 insertions(+), 2 deletions(-) diff --git a/ghc/rts/Linker.c b/ghc/rts/Linker.c index 937371f..07924a0 100644 --- a/ghc/rts/Linker.c +++ b/ghc/rts/Linker.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Linker.c,v 1.13 2001/01/28 17:14:11 simonmar Exp $ + * $Id: Linker.c,v 1.14 2001/01/28 20:53:38 qrczak Exp $ * * (c) The GHC Team, 2000 * @@ -139,6 +139,9 @@ static int ocResolve_PEi386 ( ObjectCode* oc ); SymX(stg_sel_10_upd_info) \ SymX(stg_sel_11_upd_info) \ SymX(stg_sel_12_upd_info) \ + SymX(stg_sel_13_upd_info) \ + SymX(stg_sel_14_upd_info) \ + SymX(stg_sel_15_upd_info) \ SymX(stg_upd_frame_info) \ SymX(stg_seq_frame_info) \ SymX(stg_CAF_BLACKHOLE_info) \ @@ -232,7 +235,16 @@ static int ocResolve_PEi386 ( ObjectCode* oc ); SymX(PatErrorHdrHook) \ SymX(defaultsHook) \ SymX(PreTraceHook) \ - SymX(PostTraceHook) + SymX(PostTraceHook) \ + SymX(stg_sig_install) \ + Sym(nocldstop) \ + SymX(createAdjustor) \ + SymX(rts_mkInt) \ + SymX(rts_mkStablePtr) \ + SymX(rts_apply) \ + SymX(rts_evalIO) \ + SymX(rts_checkSchedStatus) \ + SymX(rts_getInt) #ifndef SUPPORT_LONG_LONGS #define RTS_LONG_LONG_SYMS /* nothing */ -- 1.7.10.4