[svn:parrot] r39699 - trunk/src

[petdance at svn.parrot.org]

Author: petdance
Date: Mon Jun 22 04:21:49 2009
New Revision: 39699
URL: https://trac.parrot.org/parrot/changeset/39699

Log:
localized a variable, and removed an unused one

Modified:
   trunk/src/key.c

Modified: trunk/src/key.c
==============================================================================
--- trunk/src/key.c	Mon Jun 22 04:12:58 2009	(r39698)
+++ trunk/src/key.c	Mon Jun 22 04:21:49 2009	(r39699)
@@ -450,7 +450,6 @@
         /* remember to COW strings instead of returning them directly */
         case KEY_string_FLAG:
         {
-            INTVAL int_key;
             STRING *s;
             GETATTR_Key_str_key(interp, key, s);
             if (s)
@@ -619,9 +618,9 @@
     ASSERT_ARGS(key_mark)
     const UINTVAL flags = PObj_get_FLAGS(key) & KEY_type_FLAGS;
     PMC          *next_key;
-    STRING       *str_key;
 
     if (flags == KEY_string_FLAG) {
+        STRING *str_key;
         GETATTR_Key_str_key(interp, key, str_key);
         Parrot_gc_mark_PObj_alive(interp, (PObj *)str_key);
     }
@@ -668,7 +667,7 @@
     INTVAL         int_key;
     STRING        *str_key;
 
-    for (;key;) {
+    while (key != NULL) {
         switch (PObj_get_FLAGS(key) & KEY_type_FLAGS) {
             case KEY_integer_FLAG:
                 GETATTR_Key_int_key(interp, key, int_key);