X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=73d403478ae2251a1cf28766a04fecfa25c1ece0;hb=7c4e0a7fd212d0d543252a229fdb13fce53b8c0c;hp=d50821616d27d5b53970fdd601bbf1d46f7620af;hpb=354672b03f0d765145ada7821b5e001db22274dd;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index d508216..73d4034 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -95,8 +95,6 @@ static /*Str*/HashTable *symhash;
 /* Hash table mapping symbol names to StgStablePtr */
 static /*Str*/HashTable *stablehash;
 
-static unsigned int RPT_size = 0;
-
 /* List of currently loaded objects */
 ObjectCode *objects = NULL;	/* initially empty */
 
@@ -399,7 +397,11 @@ typedef struct _RtsSymbolVal {
 #define RTS_USER_SIGNALS_SYMBOLS \
    SymX(setIOManagerPipe)
 #else
-#define RTS_USER_SIGNALS_SYMBOLS /* nothing */
+#define RTS_USER_SIGNALS_SYMBOLS \
+   SymX(sendIOManagerEvent) \
+   SymX(readIOManagerEvent) \
+   SymX(getIOManagerEvent) \
+   SymX(console_handler)
 #endif
 
 #ifdef TABLES_NEXT_TO_CODE