[svn:parrot] r34844 - in branches/pdd09gc_part2: include/parrot src src/gc

[chromatic]

Author: chromatic
Date: Fri Jan  2 18:03:48 2009
New Revision: 34844

Modified:
   branches/pdd09gc_part2/include/parrot/gc_api.h
   branches/pdd09gc_part2/src/gc/api.c
   branches/pdd09gc_part2/src/pmc.c

Log:
[GC] Renamed Parrot_free_pmc_ext() to Parrot_gc_free_pmc_ext().


Modified: branches/pdd09gc_part2/include/parrot/gc_api.h
==============================================================================
--- branches/pdd09gc_part2/include/parrot/gc_api.h      (original)
+++ branches/pdd09gc_part2/include/parrot/gc_api.h      Fri Jan  2 18:03:48 2009
@@ -127,7 +127,7 @@
 int Parrot_gc_trace_root(PARROT_INTERP, Parrot_gc_trace_type)
         __attribute__nonnull__(1);
 
-void Parrot_free_pmc_ext(PARROT_INTERP, ARGMOD(PMC *p))
+void Parrot_gc_free_pmc_ext(PARROT_INTERP, ARGMOD(PMC *p))
         __attribute__nonnull__(1)
         __attribute__nonnull__(2)
         FUNC_MODIFIES(*p);

Modified: branches/pdd09gc_part2/src/gc/api.c
==============================================================================
--- branches/pdd09gc_part2/src/gc/api.c (original)
+++ branches/pdd09gc_part2/src/gc/api.c Fri Jan  2 18:03:48 2009
@@ -702,7 +702,7 @@
         VTABLE_destroy(interp, pmc);
 
     if (PObj_is_PMC_EXT_TEST(p))
-         Parrot_free_pmc_ext(interp, pmc);
+         Parrot_gc_free_pmc_ext(interp, pmc);
 
 #ifndef NDEBUG
 
@@ -716,7 +716,7 @@
 
 /*
 
-=item C<void Parrot_free_pmc_ext>
+=item C<void Parrot_gc_free_pmc_ext>
 
 Frees the C<PMC_EXT> structure attached to a PMC, if it exists.
 
@@ -725,7 +725,7 @@
 */
 
 void
-Parrot_free_pmc_ext(PARROT_INTERP, ARGMOD(PMC *p))
+Parrot_gc_free_pmc_ext(PARROT_INTERP, ARGMOD(PMC *p))
 {
     /* if the PMC has a PMC_EXT structure, return it to the pool/arena */
     Arenas            * const arena_base = interp->arena_base;
@@ -784,7 +784,6 @@
 Parrot_gc_free_buffer_malloc(SHIM_INTERP, SHIM(Small_Object_Pool *pool),
         ARGMOD(PObj *b))
 {
-
     /* free allocated space at (int *)bufstart - 1, but not if it used COW or 
is
      * external */
     PObj_buflen(b) = 0;

Modified: branches/pdd09gc_part2/src/pmc.c
==============================================================================
--- branches/pdd09gc_part2/src/pmc.c    (original)
+++ branches/pdd09gc_part2/src/pmc.c    Fri Jan  2 18:03:48 2009
@@ -183,7 +183,7 @@
     }
     else {
         if (has_ext)
-            Parrot_free_pmc_ext(interp, pmc);
+            Parrot_gc_free_pmc_ext(interp, pmc);
 
 #if ! PMC_DATA_IN_EXT
         PMC_data(pmc) = NULL;
@@ -471,7 +471,7 @@
         VTABLE_destroy(interp, pmc);
 
     if (PObj_is_PMC_EXT_TEST(pmc))
-        Parrot_free_pmc_ext(interp, pmc);
+        Parrot_gc_free_pmc_ext(interp, pmc);
 
     PObj_flags_SETTO((PObj *)pmc, PObj_on_free_list_FLAG);
     pool->add_free_object(interp, pool, (PObj *)pmc);
@@ -630,7 +630,7 @@
     }
     else {
         if (PObj_is_PMC_EXT_TEST(_class))
-            Parrot_free_pmc_ext(interp, _class);
+            Parrot_gc_free_pmc_ext(interp, _class);
 
         DOD_flag_CLEAR(is_special_PMC, _class);