Author: tene
Date: Fri Aug 8 00:07:48 2008
New Revision: 30124
Modified:
trunk/src/ops/core.ops
Log:
Condingstd fix for my last commit.
Modified: trunk/src/ops/core.ops
==============================================================================
--- trunk/src/ops/core.ops (original)
+++ trunk/src/ops/core.ops Fri Aug 8 00:07:48 2008
@@ -816,8 +816,8 @@
inline op throw(invar PMC) :flow {
opcode_t * const ret = expr NEXT();
- Parrot_cont * resume = new_ret_continuation_pmc(interp,ret);
-
VTABLE_set_attr_str(interp,$1,string_from_literal(interp,"retcont"),resume);
+ Parrot_cont * resume = new_ret_continuation_pmc(interp, ret);
+ VTABLE_set_attr_str(interp, $1, string_from_literal(interp, "retcont"),
resume);
opcode_t * const dest = Parrot_ex_throw_from_op(interp, $1, resume);
goto ADDRESS(dest);
}