summaryrefslogtreecommitdiff
path: root/rts/Sparks.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Sparks.c')
-rw-r--r--rts/Sparks.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/rts/Sparks.c b/rts/Sparks.c
index ec075805bf..e0b2e66a7d 100644
--- a/rts/Sparks.c
+++ b/rts/Sparks.c
@@ -89,7 +89,7 @@ pruneSparkQueue (Capability *cap)
{
SparkPool *pool;
StgClosurePtr spark, tmp, *elements;
- nat n, pruned_sparks; // stats only
+ uint32_t n, pruned_sparks; // stats only
StgWord botInd,oldBotInd,currInd; // indices in array (always < size)
const StgInfoTable *info;
@@ -293,10 +293,10 @@ traverseSparkQueue (evac_fn evac, void *user, Capability *cap)
*
* Could be called after GC, before Cap. release, from scheduler.
* -------------------------------------------------------------------------- */
-void balanceSparkPoolsCaps(nat n_caps, Capability caps[])
+void balanceSparkPoolsCaps(uint32_t n_caps, Capability caps[])
GNUC3_ATTRIBUTE(__noreturn__);
-void balanceSparkPoolsCaps(nat n_caps STG_UNUSED,
+void balanceSparkPoolsCaps(uint32_t n_caps STG_UNUSED,
Capability caps[] STG_UNUSED) {
barf("not implemented");
}