diff options
author | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2018-03-07 14:34:46 +0300 |
---|---|---|
committer | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2018-03-07 14:34:46 +0300 |
commit | d9d463289fe20316cff12a8f0dbf414db678fa72 (patch) | |
tree | 4891090c45a972a1040e6bf9745cf87fa9792661 /rts/Sparks.c | |
parent | b120e649b7b13ee2a2c1bfe568a91bea9d271fba (diff) | |
download | haskell-d9d463289fe20316cff12a8f0dbf414db678fa72.tar.gz |
Schedule.c: remove unreachable code block
Diffstat (limited to 'rts/Sparks.c')
-rw-r--r-- | rts/Sparks.c | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/rts/Sparks.c b/rts/Sparks.c index a31a5dfbe5..bd5e120863 100644 --- a/rts/Sparks.c +++ b/rts/Sparks.c @@ -284,21 +284,6 @@ traverseSparkQueue (evac_fn evac, void *user, Capability *cap) sparkPoolSize(pool), pool->bottom, pool->top); } -/* ---------------------------------------------------------------------------- - * balanceSparkPoolsCaps: takes an array of capabilities (usually: all - * capabilities) and its size. Accesses all spark pools and equally - * distributes the sparks among them. - * - * Could be called after GC, before Cap. release, from scheduler. - * -------------------------------------------------------------------------- */ -void balanceSparkPoolsCaps(uint32_t n_caps, Capability caps[]) - GNUC3_ATTRIBUTE(__noreturn__); - -void balanceSparkPoolsCaps(uint32_t n_caps STG_UNUSED, - Capability caps[] STG_UNUSED) { - barf("not implemented"); -} - #else StgInt |