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

[petdance at svn.parrot.org]

Author: petdance
Date: Sun Jul  5 05:02:03 2009
New Revision: 39887
URL: https://trac.parrot.org/parrot/changeset/39887

Log:
localizing and consting

Modified:
   trunk/src/pmc/sub.pmc

Modified: trunk/src/pmc/sub.pmc
==============================================================================
--- trunk/src/pmc/sub.pmc	Sun Jul  5 03:00:54 2009	(r39886)
+++ trunk/src/pmc/sub.pmc	Sun Jul  5 05:02:03 2009	(r39887)
@@ -222,7 +222,6 @@
         Parrot_sub     *sub;
         Parrot_Context *caller_ctx;
         Parrot_Context *context;
-        Parrot_Context *c;
         PMC            *ccont;
         opcode_t       *pc;
 
@@ -318,6 +317,7 @@
         }
         else {
             /* autoclose */
+            Parrot_Context *c;
             for (c = context; !c->outer_ctx; c = c->outer_ctx) {
 
                 PMC         *outer_pmc;
@@ -765,7 +765,7 @@
         /* If the argument info hasn't been generated yet, generate it. */
         if (!sub->arg_info) {
             /* Get pointer into the bytecode where this sub starts. */
-            opcode_t *pc = sub->seg->base.data + sub->start_offs;
+            const opcode_t *pc = sub->seg->base.data + sub->start_offs;
 
             /* Allocate structure to store argument information in. */
             sub->arg_info = mem_allocate_zeroed_typed(Parrot_sub_arginfo);