Simplify some code; patch from Bill Tutt

2 files changed, 2 insertions, 5 deletions

diff --git a/rts/Schedule.c b/rts/Schedule.c
index ea779dd8a6..b32c1e5993 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -2068,10 +2068,7 @@ setNumCapabilities (nat new_n_capabilities USED_IF_THREADS)
     }
 
     // Notify IO manager that the number of capabilities has changed.
-    rts_evalIO(
-       &cap,
-       DLL_IMPORT_DATA_REF(base_GHCziConcziIO_ioManagerCapabilitiesChanged_closure),
-       NULL);
+    rts_evalIO(&cap, ioManagerCapabilitiesChanged_closure, NULL);
 
     rts_unlock(cap);
 
diff --git a/rts/win32/ThrIOManager.c b/rts/win32/ThrIOManager.c
index 4a76c30533..c4974016c1 100644
--- a/rts/win32/ThrIOManager.c
+++ b/rts/win32/ThrIOManager.c
@@ -152,7 +152,7 @@ ioManagerStart (void)
     Capability *cap;
     if (io_manager_event == INVALID_HANDLE_VALUE) {
 	cap = rts_lock();
-        rts_evalIO(&cap,DLL_IMPORT_DATA_REF(base_GHCziConcziIO_ensureIOManagerIsRunning_closure),NULL);
+        rts_evalIO(&cap,ensureIOManagerIsRunning_closure,NULL);
 	rts_unlock(cap);
     }
 }