summaryrefslogtreecommitdiff
path: root/rts/Sparks.c
diff options
context:
space:
mode:
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
commitd9d463289fe20316cff12a8f0dbf414db678fa72 (patch)
tree4891090c45a972a1040e6bf9745cf87fa9792661 /rts/Sparks.c
parentb120e649b7b13ee2a2c1bfe568a91bea9d271fba (diff)
downloadhaskell-d9d463289fe20316cff12a8f0dbf414db678fa72.tar.gz
Schedule.c: remove unreachable code block
Diffstat (limited to 'rts/Sparks.c')
-rw-r--r--rts/Sparks.c15
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