summaryrefslogtreecommitdiff
path: root/rts/Proftimer.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/Proftimer.c')
-rw-r--r--rts/Proftimer.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/rts/Proftimer.c b/rts/Proftimer.c
index 76d7679000..569f087bb4 100644
--- a/rts/Proftimer.c
+++ b/rts/Proftimer.c
@@ -11,6 +11,7 @@
#include "Profiling.h"
#include "Proftimer.h"
+#include "Capability.h"
#ifdef PROFILING
static rtsBool do_prof_ticks = rtsFalse; // enable profiling ticks
@@ -73,7 +74,10 @@ handleProfTick(void)
#ifdef PROFILING
total_ticks++;
if (do_prof_ticks) {
- CCCS->time_ticks++;
+ nat n;
+ for (n=0; n < n_capabilities; n++) {
+ capabilities[n].r.rCCCS->time_ticks++;
+ }
}
#endif