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

bacek at svn.parrot.org bacek at svn.parrot.org
Sat Jul 18 11:32:20 UTC 2009


Author: bacek
Date: Sat Jul 18 11:32:19 2009
New Revision: 40142
URL: https://trac.parrot.org/parrot/changeset/40142

Log:
[cage][pmc] StringIterator.shift_pmc respect HLL for new PMCs. fperrad++

Modified:
   trunk/src/pmc/stringiterator.pmc

Modified: trunk/src/pmc/stringiterator.pmc
==============================================================================
--- trunk/src/pmc/stringiterator.pmc	Sat Jul 18 05:56:44 2009	(r40141)
+++ trunk/src/pmc/stringiterator.pmc	Sat Jul 18 11:32:19 2009	(r40142)
@@ -204,7 +204,7 @@
             Parrot_ex_throw_from_c_args(INTERP, NULL, EXCEPTION_OUT_OF_BOUNDS,
                 "StopIteration");
 
-        ret = pmc_new(INTERP, enum_class_String);
+        ret = pmc_new(INTERP, Parrot_get_ctx_HLL_type(interp, enum_class_String));
         VTABLE_set_string_native(INTERP, ret,
                 VTABLE_get_string_keyed_int(INTERP, attrs->string, attrs->pos++));
         return ret;
@@ -268,7 +268,7 @@
             Parrot_ex_throw_from_c_args(INTERP, NULL, EXCEPTION_OUT_OF_BOUNDS,
                 "StopIteration");
 
-        ret = pmc_new(INTERP, enum_class_String);
+        ret = pmc_new(INTERP, Parrot_get_ctx_HLL_type(interp, enum_class_String));
         VTABLE_set_string_native(INTERP, ret,
                 VTABLE_get_string_keyed_int(INTERP, attrs->string, --attrs->pos));
         return ret;


More information about the parrot-commits mailing list