[svn:parrot] r39583 - trunk/src/runcore

petdance at svn.parrot.org petdance at svn.parrot.org
Tue Jun 16 05:19:34 UTC 2009


Author: petdance
Date: Tue Jun 16 05:19:33 2009
New Revision: 39583
URL: https://trac.parrot.org/parrot/changeset/39583

Log:
consting

Modified:
   trunk/src/runcore/trace.c

Modified: trunk/src/runcore/trace.c
==============================================================================
--- trunk/src/runcore/trace.c	Tue Jun 16 03:00:24 2009	(r39582)
+++ trunk/src/runcore/trace.c	Tue Jun 16 05:19:33 2009	(r39583)
@@ -471,20 +471,20 @@
 done:
 
     if (interp->code->annotations) {
-        PMC *annot = PackFile_Annotations_lookup(interp, interp->code->annotations,
+        PMC * const annot = PackFile_Annotations_lookup(interp, interp->code->annotations,
                 pc - code_start + 1, NULL);
         if (!PMC_IS_NULL(annot)) {
-            PMC *pfile = VTABLE_get_pmc_keyed_str(interp, annot,
+            PMC * const pfile = VTABLE_get_pmc_keyed_str(interp, annot,
                     Parrot_str_new_constant(interp, "file"));
-            PMC *pline = VTABLE_get_pmc_keyed_str(interp, annot,
+            PMC * const pline = VTABLE_get_pmc_keyed_str(interp, annot,
                     Parrot_str_new_constant(interp, "line"));
             if ((!PMC_IS_NULL(pfile)) && (!PMC_IS_NULL(pline))) {
                 /* The debugger interpreter may not be the same as
                  * the main interpreter, extract values from the
                  * PMC instad of passing them directly
                  */
-                STRING *file = VTABLE_get_string(interp, pfile);
-                INTVAL line = VTABLE_get_integer(interp, pline);
+                STRING * const file = VTABLE_get_string(interp, pfile);
+                const INTVAL line   = VTABLE_get_integer(interp, pline);
                 Parrot_io_eprintf(debugger, " (%Ss:%li)", file, (long)line);
             }
         }


More information about the parrot-commits mailing list