X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fposix%2FSignals.c;h=660065734b84ff07dbc8442edb9603092f1897fe;hb=0434f5bf9a2712a99e9e6c99d67991a3f09af91d;hp=aa7877452ba0d18df665453b03e04593431c21dc;hpb=3501ac6af749ada0afcaf84f112ab2e4bf9120b9;p=ghc-hetmet.git diff --git a/rts/posix/Signals.c b/rts/posix/Signals.c index aa78774..6600657 100644 --- a/rts/posix/Signals.c +++ b/rts/posix/Signals.c @@ -124,12 +124,6 @@ ioManagerDie (void) } } -Capability * -ioManagerStartCap (Capability *cap) -{ - return rts_evalIO(cap,&base_GHCziConc_ensureIOManagerIsRunning_closure,NULL); -} - void ioManagerStart (void) { @@ -137,7 +131,7 @@ ioManagerStart (void) Capability *cap; if (io_manager_pipe < 0) { cap = rts_lock(); - cap = ioManagerStartCap(cap); + cap = rts_evalIO(cap,&base_GHCziConc_ensureIOManagerIsRunning_closure,NULL); rts_unlock(cap); } }