From 96fff1ba94bd3a21da3fa797816bd6e82e4148ba Mon Sep 17 00:00:00 2001 From: Duncan Coutts Date: Sat, 13 Jun 2009 17:06:22 +0000 Subject: [PATCH] Exports a few rts things we need for cmm code in external packages In particular we need alloc_blocks and alloc_blocks_lim for MAYBE_GC. The gmp cmm primops also use stg_ARR_WORDS_info. --- rts/Linker.c | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/rts/Linker.c b/rts/Linker.c index 68bd586..17c5c3b 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -771,6 +771,7 @@ typedef struct _RtsSymbolVal { SymI_HasProto(stg_MVAR_DIRTY_info) \ SymI_HasProto(stg_IND_STATIC_info) \ SymI_HasProto(stg_INTLIKE_closure) \ + SymI_HasProto(stg_ARR_WORDS_info) \ SymI_HasProto(stg_MUT_ARR_PTRS_DIRTY_info) \ SymI_HasProto(stg_MUT_ARR_PTRS_FROZEN_info) \ SymI_HasProto(stg_MUT_ARR_PTRS_FROZEN0_info) \ @@ -845,6 +846,9 @@ typedef struct _RtsSymbolVal { SymI_HasProto(xorIntegerzh_fast) \ SymI_HasProto(yieldzh_fast) \ SymI_NeedsProto(stg_interp_constr_entry) \ + SymI_HasProto(alloc_blocks) \ + SymI_HasProto(alloc_blocks_lim) \ + SymI_HasProto(allocateLocal) \ SymI_HasProto(allocateExec) \ SymI_HasProto(freeExec) \ SymI_HasProto(getAllocations) \ -- 1.7.10.4