X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=78e112ff5613851fae0359a769d87a531b3fef11;hb=254528e32a007e508bb5967948ba02aa15c7e482;hp=6ef0a21646dc60a2005b3d5f7eabd85a2d1ac9b2;hpb=b49f7dceb6c2d12c89c947fa0f7f7cb935912de3;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index 6ef0a21..78e112f 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -501,8 +501,8 @@ typedef struct _RtsSymbolVal {
 #if !defined(mingw32_HOST_OS)
 #define RTS_USER_SIGNALS_SYMBOLS \
    SymI_HasProto(setIOManagerPipe) \
-   SymI_NeedsProto(blockUserSignals) \
-   SymI_NeedsProto(unblockUserSignals)
+   SymI_HasProto(blockUserSignals) \
+   SymI_HasProto(unblockUserSignals)
 #else
 #define RTS_USER_SIGNALS_SYMBOLS     \
    SymI_HasProto(sendIOManagerEvent) \