X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FLinker.c;h=318b3f070db9ee536bc8f10e293c420abcc0e5b6;hp=d1550e1eb5b4da23db65586831ecf144e8e92922;hb=d9f20043f1bff6d3731e62de4db4d98fcff57498;hpb=a5b95b1f569d05b2a04583ff6042add3efaaefc3

diff --git a/rts/Linker.c b/rts/Linker.c
index d1550e1..318b3f0 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -768,6 +768,7 @@ typedef struct _RtsSymbolVal {
       SymX(stg_upd_frame_info)			\
       SymX(suspendThread)			\
       SymX(takeMVarzh_fast)			\
+      SymX(threadStatuszh_fast)			\
       SymX(timesIntegerzh_fast)			\
       SymX(tryPutMVarzh_fast)			\
       SymX(tryTakeMVarzh_fast)			\