#define RTS_GHC_CONC_SYMBOLS \
SymI_NeedsProto(base_GHCziConc_pendingDelays_closure) \
- SymI_NeedsProto(base_GHCziConc_pendingEvents_closure) \
SymI_NeedsProto(base_GHCziConc_ioManagerThread_closure)
#ifdef mingw32_HOST_OS
#define RTS_GHC_CONC_OS_SYMBOLS /* empty */
#else
#define RTS_GHC_CONC_OS_SYMBOLS \
+ SymI_NeedsProto(base_GHCziConc_pendingEvents_closure) \
SymI_NeedsProto(base_GHCziConc_prodding_closure) \
SymI_NeedsProto(base_GHCziConc_sync_closure) \
SymI_NeedsProto(base_GHCziConc_stick_closure)
void *data
)
{
-#define GHC_CONC "base_GHCziConc"
+#define GHC_CONC MAYBE_LEADING_UNDERSCORE_STR("base_GHCziConc")
if (lookupHashTable(table, (StgWord)key) == NULL)
{