X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=rts%2FLinker.c;h=4ce525f80e8fbad6a741ce6a363fe9ff0563feb4;hb=2d5e052d795c99c17b1ca6fa1ca8be7d082be09c;hp=e3278b5ef480be4796dafbfec5f4224fc9000682;hpb=cd0e2c0cc3005c3f5e74eeda57dc9cebbe1bac7e;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index e3278b5..4ce525f 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -505,10 +505,13 @@ typedef struct _RtsSymbolVal {
 #if !defined(mingw32_HOST_OS)
 #define RTS_USER_SIGNALS_SYMBOLS \
    SymI_HasProto(setIOManagerPipe) \
+   SymI_HasProto(ioManagerWakeup) \
+   SymI_HasProto(ioManagerSync) \
    SymI_HasProto(blockUserSignals) \
    SymI_HasProto(unblockUserSignals)
 #else
 #define RTS_USER_SIGNALS_SYMBOLS     \
+   SymI_HasProto(ioManagerWakeup) \
    SymI_HasProto(sendIOManagerEvent) \
    SymI_HasProto(readIOManagerEvent) \
    SymI_HasProto(getIOManagerEvent)  \
@@ -736,7 +739,11 @@ typedef struct _RtsSymbolVal {
       SymI_HasProto(forkOS_createThread)		\
       SymI_HasProto(freeHaskellFunctionPtr)		\
       SymI_HasProto(getOrSetTypeableStore)		\
-      SymI_HasProto(getOrSetSignalHandlerStore)		\
+      SymI_HasProto(getOrSetGHCConcSignalHandlerStore)		\
+      SymI_HasProto(getOrSetGHCConcPendingEventsStore)		\
+      SymI_HasProto(getOrSetGHCConcPendingDelaysStore)		\
+      SymI_HasProto(getOrSetGHCConcIOManagerThreadStore)	\
+      SymI_HasProto(getOrSetGHCConcProddingStore)		\
       SymI_HasProto(genSymZh)				\
       SymI_HasProto(genericRaise)			\
       SymI_HasProto(getProgArgv)			\