[svn:parrot] r43744 - branches/gc_encapsulate/src/gc

bacek at svn.parrot.org bacek at svn.parrot.org
Sun Feb 7 06:10:50 UTC 2010


Author: bacek
Date: Sun Feb  7 06:10:49 2010
New Revision: 43744
URL: https://trac.parrot.org/parrot/changeset/43744

Log:
Implement more introspection in gc_ms_info.

Modified:
   branches/gc_encapsulate/src/gc/gc_ms.c

Modified: branches/gc_encapsulate/src/gc/gc_ms.c
==============================================================================
--- branches/gc_encapsulate/src/gc/gc_ms.c	Sun Feb  7 06:10:29 2010	(r43743)
+++ branches/gc_encapsulate/src/gc/gc_ms.c	Sun Feb  7 06:10:49 2010	(r43744)
@@ -694,16 +694,23 @@
         case GC_COLLECT_RUNS:
             return mem_pools->gc_collect_runs;
         case ACTIVE_PMCS:
+            return mem_pools->pmc_pool->total_objects -
+                   mem_pools->pmc_pool->num_free_objects;
         case ACTIVE_BUFFERS:
         case TOTAL_PMCS:
+            return mem_pools->pmc_pool->total_objects;
         case TOTAL_BUFFERS:
         case HEADER_ALLOCS_SINCE_COLLECT:
+            return mem_pools->header_allocs_since_last_collect;
         case MEM_ALLOCS_SINCE_COLLECT:
+            return mem_pools->mem_allocs_since_last_collect;
         case TOTAL_COPIED:
+            return mem_pools->memory_collected;
         case IMPATIENT_PMCS:
+            return mem_pools->num_early_gc_PMCs;
         case GC_LAZY_MARK_RUNS:
+            return mem_pools->gc_lazy_mark_runs;
         case EXTENDED_PMCS:
-        case CURRENT_RUNCORE:
         default:
             break;
     }


More information about the parrot-commits mailing list