X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=17c5c3bc186f596ef0a853d06517374fa3f256d9;hb=d874b8c93b737bf26c949ef7bf19fc43e335bd1f;hp=68bd5864a1bb7ceb32782dc55dfba90c6a6ec271;hpb=85df606a23117641682e19f3851099134e5f77a4;p=ghc-hetmet.git

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)                     \