[svn:parrot] r46721 - trunk/src/gc

petdance at svn.parrot.org petdance at svn.parrot.org
Mon May 17 02:21:45 UTC 2010


Author: petdance
Date: Mon May 17 02:21:45 2010
New Revision: 46721
URL: https://trac.parrot.org/parrot/changeset/46721

Log:
removed unused variables and commented out code

Modified:
   trunk/src/gc/alloc_resources.c

Modified: trunk/src/gc/alloc_resources.c
==============================================================================
--- trunk/src/gc/alloc_resources.c	Sun May 16 22:49:33 2010	(r46720)
+++ trunk/src/gc/alloc_resources.c	Mon May 17 02:21:45 2010	(r46721)
@@ -1115,7 +1115,6 @@
 Parrot_gc_destroy_header_pools(PARROT_INTERP, ARGMOD(Memory_Pools *mem_pools))
 {
     ASSERT_ARGS(Parrot_gc_destroy_header_pools)
-    INTVAL pass;
 
     /* const/non const COW strings life in different pools
      * so in first pass
@@ -1128,10 +1127,8 @@
     header_pools_iterate_callback(interp, mem_pools, POOL_PMC | POOL_CONST, NULL,
             sweep_cb_pmc);
 
-    /* for (pass = start; pass <= 2; ++pass) { */ /* XXX it's unsed loop */
-        header_pools_iterate_callback(interp, mem_pools, POOL_BUFFER | POOL_CONST,
-                (void *)start, sweep_cb_buf);
-    /* } */
+    header_pools_iterate_callback(interp, mem_pools, POOL_BUFFER | POOL_CONST,
+            (void *)start, sweep_cb_buf);
 
     mem_internal_free(mem_pools->sized_header_pools);
 
@@ -1385,13 +1382,11 @@
     cur_arena = source->last_Arena;
 
     while (cur_arena) {
-        size_t                     total_objects;
         Fixed_Size_Arena * const next_arena = cur_arena->prev;
+        const size_t total_objects          = cur_arena->total_objects;
 
         cur_arena->next = cur_arena->prev = NULL;
 
-        total_objects   = cur_arena->total_objects;
-
         Parrot_append_arena_in_pool(interp, mem_pools, dest, cur_arena,
             cur_arena->total_objects);
 


More information about the parrot-commits mailing list