summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMitchell Rosen <mitchellwrosen@gmail.com>2021-11-28 11:38:35 -0500
committerMarge Bot <ben+marge-bot@smart-cactus.org>2021-11-30 01:32:22 -0500
commit9345bfeda8f463d3fc79054166cb90fe89ea3469 (patch)
tree77ecf343d9f3afb924f9eea116a6cb62a512dcfb
parent22bbf449a5e4dd260b92ae19de180e9cc34e1d81 (diff)
downloadhaskell-9345bfeda8f463d3fc79054166cb90fe89ea3469.tar.gz
Fix caluclation of nonmoving GC elapsed time
Fixes #20751
-rw-r--r--rts/Stats.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Stats.c b/rts/Stats.c
index 0c22f7e42b..ed6695ad45 100644
--- a/rts/Stats.c
+++ b/rts/Stats.c
@@ -298,7 +298,7 @@ stat_startNonmovingGc ()
{
ACQUIRE_LOCK(&stats_mutex);
start_nonmoving_gc_cpu = getCurrentThreadCPUTime();
- start_nonmoving_gc_elapsed = getProcessCPUTime();
+ start_nonmoving_gc_elapsed = getProcessElapsedTime();
RELEASE_LOCK(&stats_mutex);
}
@@ -306,7 +306,7 @@ void
stat_endNonmovingGc ()
{
Time cpu = getCurrentThreadCPUTime();
- Time elapsed = getProcessCPUTime();
+ Time elapsed = getProcessElapsedTime();
ACQUIRE_LOCK(&stats_mutex);
stats.gc.nonmoving_gc_elapsed_ns = elapsed - start_nonmoving_gc_elapsed;