<br><br><div class="gmail_quote">On Sat, Feb 16, 2013 at 5:04 PM, Ian Lynagh <span dir="ltr"><<a href="mailto:igloo@earth.li" target="_blank">igloo@earth.li</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
diff --git a/rts/Prelude.h b/rts/Prelude.h<br>
index dcd7b94..89e80a0 100644<br>
--- a/rts/Prelude.h<br>
+++ b/rts/Prelude.h<br>
@@ -93,6 +93,7 @@ PRELUDE_INFO(base_GHCziStable_StablePtr_con_info);<br>
<br>
#define runSparks_closure DLL_IMPORT_DATA_REF(base_GHCziConcziSync_runSparks_closure)<br>
#define ensureIOManagerIsRunning_closure DLL_IMPORT_DATA_REF(base_GHCziConcziIO_ensureIOManagerIsRunning_closure)<br>
+#define ioManagerCapabilitiesChanged_closure DLL_IMPORT_DATA_REF(base_GHCziConcziIO_ioManagerCapabilitiesChanged_closure)<br>
#define runHandlers_closure DLL_IMPORT_DATA_REF(base_GHCziConcziSignal_runHandlers_closure)<br>
<br>
#define flushStdHandles_closure DLL_IMPORT_DATA_REF(base_GHCziTopHandler_flushStdHandles_closure)<br></blockquote><div> </div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
diff --git a/rts/Schedule.c b/rts/Schedule.c<br>
index f39ef96..ea779dd 100644<br>
--- a/rts/Schedule.c<br>
+++ b/rts/Schedule.c<br>
@@ -2070,7 +2070,7 @@ setNumCapabilities (nat new_n_capabilities USED_IF_THREADS)<br>
// Notify IO manager that the number of capabilities has changed.<br>
rts_evalIO(<br>
&cap,<br>
- &base_GHCziConcziIO_ioManagerCapabilitiesChanged_closure,<br>
+ DLL_IMPORT_DATA_REF(base_GHCziConcziIO_ioManagerCapabilitiesChanged_closure),<br>
NULL);<br></blockquote><div><br></div><div><br></div><div>Shouldn't this use the new #define you added to Prelude.h just above?</div><div><br></div><div>This bit in rts\Win32\ThrIOManager.c should also use the Prelude.h macro:</div>
<div><br></div><div><span class="Apple-style-span" style="border-collapse:collapse;color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13px"><div>#if defined(COMPILING_WINDOWS_DLL)</div><div># if defined(x86_64_HOST_ARCH)</div>
<div> rts_evalIO(&cap,__imp_base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);</div><div># else</div><div> rts_evalIO(&cap,_imp__base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);</div>
<div># endif</div><div>#else</div><div> rts_evalIO(&cap,&base_GHCziConcziIO_ensureIOManagerIsRunning_closure,NULL);</div><div>#endif</div><div><br></div></span></div><div><br></div><div>Bill</div></div>