[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