X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=d12c6fcc09d038f0a849d92b46625d6467d24729;hb=3545603ca61d81093151307477bdecb7910cb1b7;hp=2dcd21be4327f501b3315e777d133582bd435de7;hpb=f5f023361796c9553933eccf82e0c066e5e30814;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index 2dcd21b..d12c6fc 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -21,6 +21,7 @@
 #include "HsFFI.h"
 
 #include "sm/Storage.h"
+#include "Stats.h"
 #include "Hash.h"
 #include "LinkerInternals.h"
 #include "RtsUtils.h"
@@ -943,9 +944,9 @@ typedef struct _RtsSymbolVal {
       SymI_HasProto(stg_writeTVarzh)			\
       SymI_HasProto(stg_yieldzh)                        \
       SymI_NeedsProto(stg_interp_constr_entry)          \
-      SymI_HasProto(alloc_blocks)                       \
       SymI_HasProto(alloc_blocks_lim)                   \
-      SymI_HasProto(allocateLocal)                      \
+      SymI_HasProto(g0)                                 \
+      SymI_HasProto(allocate)                           \
       SymI_HasProto(allocateExec)	                \
       SymI_HasProto(freeExec)		                \
       SymI_HasProto(getAllocations)                     \