Author: julianalbo
Date: Fri Aug 8 04:59:17 2008
New Revision: 30128
Modified:
trunk/src/ops/core.ops
Log:
fixed op throw PMC
Modified: trunk/src/ops/core.ops
==============================================================================
--- trunk/src/ops/core.ops (original)
+++ trunk/src/ops/core.ops Fri Aug 8 04:59:17 2008
@@ -816,7 +816,7 @@
inline op throw(invar PMC) :flow {
opcode_t * const ret = expr NEXT();
- Parrot_cont * resume = new_ret_continuation_pmc(interp, ret);
+ PMC * resume = new_ret_continuation_pmc(interp, ret);
VTABLE_set_attr_str(interp, $1, const_string(interp, "retcont"), resume);
opcode_t * const dest = Parrot_ex_throw_from_op(interp, $1, resume);
goto ADDRESS(dest);