[svn:parrot] r40109 - trunk/src/pmc

petdance at svn.parrot.org petdance at svn.parrot.org
Wed Jul 15 15:13:07 UTC 2009


Author: petdance
Date: Wed Jul 15 15:13:06 2009
New Revision: 40109
URL: https://trac.parrot.org/parrot/changeset/40109

Log:
local var consting

Modified:
   trunk/src/pmc/orderedhashiterator.pmc

Modified: trunk/src/pmc/orderedhashiterator.pmc
==============================================================================
--- trunk/src/pmc/orderedhashiterator.pmc	Wed Jul 15 15:08:21 2009	(r40108)
+++ trunk/src/pmc/orderedhashiterator.pmc	Wed Jul 15 15:13:06 2009	(r40109)
@@ -79,7 +79,7 @@
 */
 
     VTABLE void mark() {
-        PMC *hash = PARROT_ORDEREDHASHITERATOR(SELF)->pmc_hash;
+        PMC * const hash = PARROT_ORDEREDHASHITERATOR(SELF)->pmc_hash;
         if (hash)
              Parrot_gc_mark_PObj_alive(INTERP, (PObj *)hash);
     }
@@ -103,7 +103,7 @@
 
 */
     VTABLE void set_integer_native(INTVAL value) {
-        Parrot_OrderedHashIterator_attributes *attrs =
+        Parrot_OrderedHashIterator_attributes * const attrs =
                 PARROT_ORDEREDHASHITERATOR(SELF);
 
         /* Restart iterator */
@@ -179,7 +179,7 @@
 */
 
     VTABLE PMC *shift_pmc() {
-        Parrot_OrderedHashIterator_attributes *attrs =
+        Parrot_OrderedHashIterator_attributes * const attrs =
                 PARROT_ORDEREDHASHITERATOR(SELF);
 
         PMC        *ret;
@@ -216,7 +216,7 @@
 */
 
     VTABLE PMC *pop_pmc() {
-        Parrot_OrderedHashIterator_attributes *attrs =
+        Parrot_OrderedHashIterator_attributes * const attrs =
                 PARROT_ORDEREDHASHITERATOR(SELF);
 
         PMC        *ret;
@@ -244,7 +244,7 @@
 */
 
     VTABLE STRING* shift_string() {
-        PMC *key = SELF.shift_pmc();
+        PMC * const key = SELF.shift_pmc();
         return VTABLE_get_string(INTERP, key);
     }
 }


More information about the parrot-commits mailing list