diff options
| author | Austin Seipp <austin@well-typed.com> | 2014-08-22 08:51:38 -0500 |
|---|---|---|
| committer | Austin Seipp <austin@well-typed.com> | 2014-08-22 08:52:13 -0500 |
| commit | 4748f5936fe72d96edfa17b153dbfd84f2c4c053 (patch) | |
| tree | ed5ad9f4fda46023a74010ecce38e3b47e17959b /rts/Capability.c | |
| parent | 22520cd7071e624cb3cbde6fdd65e872855dd6ff (diff) | |
| download | haskell-4748f5936fe72d96edfa17b153dbfd84f2c4c053.tar.gz | |
Revert "rts/base: Fix #9423"
This should fix the Windows fallout, and hopefully this will be fixed
once that's sorted out.
This reverts commit f9f89b7884ccc8ee5047cf4fffdf2b36df6832df.
Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'rts/Capability.c')
| -rw-r--r-- | rts/Capability.c | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/rts/Capability.c b/rts/Capability.c index 04f3a61993..fda9f4f278 100644 --- a/rts/Capability.c +++ b/rts/Capability.c @@ -256,7 +256,6 @@ initCapability( Capability *cap, nat i ) cap->spark_stats.converted = 0; cap->spark_stats.gcd = 0; cap->spark_stats.fizzled = 0; - cap->io_manager_control_wr_fd = -1; #endif cap->total_allocated = 0; @@ -1078,16 +1077,6 @@ rtsBool checkSparkCountInvariant (void) } #endif -void setIOManagerControlFd(nat cap_no USED_IF_THREADS, int fd USED_IF_THREADS) { -#if defined(THREADED_RTS) - if (cap_no < n_capabilities) { - capabilities[cap_no]->io_manager_control_wr_fd = fd; - } else { - errorBelch("warning: setIOManagerControlFd called with illegal capability number."); - } -#endif -} - // Local Variables: // mode: C // fill-column: 80 |