[svn:parrot] r45268 - trunk/src/ops

[petdance at svn.parrot.org]

Author: petdance
Date: Mon Mar 29 05:39:37 2010
New Revision: 45268
URL: https://trac.parrot.org/parrot/changeset/45268

Log:
consting

Modified:
   trunk/src/ops/cmp.ops

Modified: trunk/src/ops/cmp.ops
==============================================================================
--- trunk/src/ops/cmp.ops	Mon Mar 29 05:36:43 2010	(r45267)
+++ trunk/src/ops/cmp.ops	Mon Mar 29 05:39:37 2010	(r45268)
@@ -87,7 +87,7 @@
 }
 
 op eq(invar PMC, in INT, inconst LABEL) :base_core {
-    PMC * temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
+    PMC * const temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
     VTABLE_set_integer_native(interp, temp, $2);
 
     if (VTABLE_is_equal(interp, $1, temp)) {
@@ -193,7 +193,7 @@
 }
 
 op ne(invar PMC, in INT, inconst LABEL) :base_core {
-    PMC * temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
+    PMC * const temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
     VTABLE_set_integer_native(interp, temp, $2);
 
     if (!VTABLE_is_equal(interp, $1, temp)) {
@@ -289,7 +289,7 @@
 }
 
 op lt(invar PMC, in INT, inconst LABEL) :base_core {
-    PMC * temp  = Parrot_pmc_new_temporary(interp, enum_class_Integer);
+    PMC * const temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
     VTABLE_set_integer_native(interp, temp, $2);
 
     if (VTABLE_cmp(interp, $1, temp) < 0) {
@@ -373,7 +373,7 @@
 }
 
 op le(invar PMC, in INT, inconst LABEL) :base_core {
-    PMC * temp  = Parrot_pmc_new_temporary(interp, enum_class_Integer);
+    PMC * const temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
     VTABLE_set_integer_native(interp, temp, $2);
 
     if (VTABLE_cmp(interp, $1, temp) <= 0) {
@@ -433,7 +433,7 @@
 }
 
 op gt(invar PMC, in INT, inconst LABEL) :base_core {
-    PMC * temp  = Parrot_pmc_new_temporary(interp, enum_class_Integer);
+    PMC * const temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
     VTABLE_set_integer_native(interp, temp, $2);
 
     if (VTABLE_cmp(interp, $1, temp) > 0) {
@@ -493,7 +493,7 @@
 }
 
 op ge(invar PMC, in INT, inconst LABEL) :base_core {
-    PMC * temp  = Parrot_pmc_new_temporary(interp, enum_class_Integer);
+    PMC * const temp = Parrot_pmc_new_temporary(interp, enum_class_Integer);
     VTABLE_set_integer_native(interp, temp, $2);
 
     if (VTABLE_cmp(interp, $1, temp) >= 0) {
@@ -1004,7 +1004,7 @@
 
 =head1 COPYRIGHT
 
-Copyright (C) 2001-2009, Parrot Foundation.
+Copyright (C) 2001-2010, Parrot Foundation.
 
 =head1 LICENSE