[svn:parrot] r47485 - branches/gc_massacre/src/gc

[bacek at svn.parrot.org]

Author: bacek
Date: Tue Jun  8 22:30:50 2010
New Revision: 47485
URL: https://trac.parrot.org/parrot/changeset/47485

Log:
Expose some statistics from MS2. Make t/op/gc-leaky.t test happy.

Modified:
   branches/gc_massacre/src/gc/gc_ms2.c

Modified: branches/gc_massacre/src/gc/gc_ms2.c
==============================================================================
--- branches/gc_massacre/src/gc/gc_ms2.c	Tue Jun  8 22:30:11 2010	(r47484)
+++ branches/gc_massacre/src/gc/gc_ms2.c	Tue Jun  8 22:30:50 2010	(r47485)
@@ -512,10 +512,11 @@
 
 */
 static size_t
-gc_ms2_get_gc_info(SHIM_INTERP, SHIM(Interpinfo_enum what))
+gc_ms2_get_gc_info(PARROT_INTERP, Interpinfo_enum which)
 {
     ASSERT_ARGS(gc_ms2_get_gc_info)
-    return 0;
+    MarkSweep_GC *self = (MarkSweep_GC *)interp->gc_sys->gc_private;
+    return Parrot_gc_get_info(interp, which, &self->stats);
 }