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

[bacek at svn.parrot.org]

Author: bacek
Date: Thu Mar 11 09:02:04 2010
New Revision: 44869
URL: https://trac.parrot.org/parrot/changeset/44869

Log:
Use str_new_constant in pop_eh/count_eh

Modified:
   trunk/src/ops/core.ops

Modified: trunk/src/ops/core.ops
==============================================================================
--- trunk/src/ops/core.ops	Thu Mar 11 07:44:04 2010	(r44868)
+++ trunk/src/ops/core.ops	Thu Mar 11 09:02:04 2010	(r44869)
@@ -722,7 +722,7 @@
 
 inline op pop_eh() {
     Parrot_cx_delete_handler_local(interp,
-            Parrot_str_new(interp, "exception", 9));
+            Parrot_str_new_constant(interp, "exception"));
 }
 
 inline op throw(invar PMC) :flow {
@@ -768,7 +768,7 @@
 
 inline op count_eh(out INT) {
     $1 = Parrot_cx_count_handlers_local(interp,
-            Parrot_str_new(interp, "exception", 9));
+            Parrot_str_new_constant(interp, "exception"));
 }
 
 inline op die(in STR) :flow {