shithub: MicroHs

Download patch

ref: cd9f66674a7153fe9a559901b15c04525d586cb2
parent: 70be28808b1526435a4926f934753706bb5c389f
author: Lennart Augustsson <lennart@augustsson.net>
date: Sun Sep 3 15:36:14 EDT 2023

More stats.

--- a/src/runtime/eval.c
+++ b/src/runtime/eval.c
@@ -1601,10 +1601,10 @@
     printf("%"PCOMMA"15"PRIu64" combinator file size\n", (uint64_t)file_size);
     printf("%"PCOMMA"15"PRIu64" cells at start\n", start_size);
     printf("%"PCOMMA"15"PRIu64" cells heap size (%"PCOMMA""PRIu64" bytes)\n", heap_size, heap_size * NODE_SIZE);
-    printf("%"PCOMMA"15"PRIu64" cells allocated\n", num_alloc);
+    printf("%"PCOMMA"15"PRIu64" cells allocated (%"PCOMMA".1f Mbyte/s)\n", num_alloc, num_alloc * NODE_SIZE / run_time / 1000000);
     printf("%"PCOMMA"15"PRIu64" GCs\n", num_gc);
     printf("%"PCOMMA"15"PRIu64" max cells used\n", max_num_marked);
-    printf("%"PCOMMA"15"PRIu64" reductions\n", num_reductions);
+    printf("%"PCOMMA"15"PRIu64" reductions (%"PCOMMA".1f Mred/s)\n", num_reductions, num_reductions / run_time / 1000000);
     printf("%15.2fs total execution time\n", run_time);
     printf("%15.2fs total gc time\n", gc_mark_time);
 #if GCRED && 0
--