[commit: ghc] master: More format string fixes (b58282a)

git at git.haskell.org git at git.haskell.org
Tue Mar 27 17:26:31 UTC 2018


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/b58282a009ae67cbd4befbe062452026c82afd51/ghc

>---------------------------------------------------------------

commit b58282a009ae67cbd4befbe062452026c82afd51
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Tue Mar 27 09:57:01 2018 -0400

    More format string fixes


>---------------------------------------------------------------

b58282a009ae67cbd4befbe062452026c82afd51
 rts/Stats.c | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/rts/Stats.c b/rts/Stats.c
index 3efa6cc..1aea64f 100644
--- a/rts/Stats.c
+++ b/rts/Stats.c
@@ -949,11 +949,11 @@ static void report_machine_readable (const RTSSummaryStats * sum)
 #if defined(THREADED_RTS)
     MR_STAT("bound_task_count", FMT_Word32, sum->bound_task_count);
     MR_STAT("sparks_count", FMT_Word64, sum->sparks_count);
-    MR_STAT("sparks_converted", FMT_Word64, sum->sparks.converted);
-    MR_STAT("sparks_overflowed", FMT_Word64, sum->sparks.overflowed);
-    MR_STAT("sparks_dud ", FMT_Word64, sum->sparks.dud);
-    MR_STAT("sparks_gcd", FMT_Word64, sum->sparks.gcd);
-    MR_STAT("sparks_fizzled", FMT_Word64, sum->sparks.fizzled);
+    MR_STAT("sparks_converted", FMT_Word, sum->sparks.converted);
+    MR_STAT("sparks_overflowed", FMT_Word, sum->sparks.overflowed);
+    MR_STAT("sparks_dud ", FMT_Word, sum->sparks.dud);
+    MR_STAT("sparks_gcd", FMT_Word, sum->sparks.gcd);
+    MR_STAT("sparks_fizzled", FMT_Word, sum->sparks.fizzled);
     MR_STAT("work_balance", "f", sum->work_balance);
 
     // next, globals (other than internal counters)



More information about the ghc-commits mailing list