[svn:parrot] r47023 - in trunk: . include/parrot include/parrot/oplib src/ops t/pmc
NotFound at svn.parrot.org
NotFound at svn.parrot.org
Wed May 26 17:36:46 UTC 2010
Author: NotFound
Date: Wed May 26 17:36:45 2010
New Revision: 47023
URL: https://trac.parrot.org/parrot/changeset/47023
Log:
rename unroll to finalize
Modified:
trunk/DEPRECATED.pod
trunk/include/parrot/oplib/core_ops.h
trunk/include/parrot/oplib/ops.h
trunk/include/parrot/opsenum.h
trunk/src/ops/core_ops.c
trunk/src/ops/experimental.ops
trunk/t/pmc/exception-old.t
Modified: trunk/DEPRECATED.pod
==============================================================================
--- trunk/DEPRECATED.pod Wed May 26 12:29:29 2010 (r47022)
+++ trunk/DEPRECATED.pod Wed May 26 17:36:45 2010 (r47023)
@@ -233,9 +233,9 @@
L<https://trac.parrot.org/parrot/ticket/1643>
-=item unroll [experimental]
+=item finalize [experimental]
-Unroll inner runloops from exception handlers.
+Finalize exception handler, unrolling inner runloops if needed.
L<https://trac.parrot.org/parrot/ticket/1635>
Modified: trunk/include/parrot/oplib/core_ops.h
==============================================================================
--- trunk/include/parrot/oplib/core_ops.h Wed May 26 12:29:29 2010 (r47022)
+++ trunk/include/parrot/oplib/core_ops.h Wed May 26 17:36:45 2010 (r47023)
@@ -1287,8 +1287,8 @@
opcode_t * Parrot_root_new_p_pc_ic(opcode_t *, PARROT_INTERP);
opcode_t * Parrot_find_codepoint_i_s(opcode_t *, PARROT_INTERP);
opcode_t * Parrot_find_codepoint_i_sc(opcode_t *, PARROT_INTERP);
- opcode_t * Parrot_unroll_p(opcode_t *, PARROT_INTERP);
- opcode_t * Parrot_unroll_pc(opcode_t *, PARROT_INTERP);
+ opcode_t * Parrot_finalize_p(opcode_t *, PARROT_INTERP);
+ opcode_t * Parrot_finalize_pc(opcode_t *, PARROT_INTERP);
#endif /* PARROT_OPLIB_CORE_OPS_H_GUARD */
Modified: trunk/include/parrot/oplib/ops.h
==============================================================================
--- trunk/include/parrot/oplib/ops.h Wed May 26 12:29:29 2010 (r47022)
+++ trunk/include/parrot/oplib/ops.h Wed May 26 17:36:45 2010 (r47023)
@@ -1282,8 +1282,8 @@
PARROT_OP_root_new_p_pc_ic, /* 1263 */
PARROT_OP_find_codepoint_i_s, /* 1264 */
PARROT_OP_find_codepoint_i_sc, /* 1265 */
- PARROT_OP_unroll_p, /* 1266 */
- PARROT_OP_unroll_pc /* 1267 */
+ PARROT_OP_finalize_p, /* 1266 */
+ PARROT_OP_finalize_pc /* 1267 */
} parrot_opcode_enums;
Modified: trunk/include/parrot/opsenum.h
==============================================================================
--- trunk/include/parrot/opsenum.h Wed May 26 12:29:29 2010 (r47022)
+++ trunk/include/parrot/opsenum.h Wed May 26 17:36:45 2010 (r47023)
@@ -1281,8 +1281,8 @@
enum_ops_root_new_p_pc_ic = 1263,
enum_ops_find_codepoint_i_s = 1264,
enum_ops_find_codepoint_i_sc = 1265,
- enum_ops_unroll_p = 1266,
- enum_ops_unroll_pc = 1267,
+ enum_ops_finalize_p = 1266,
+ enum_ops_finalize_pc = 1267,
};
Modified: trunk/src/ops/core_ops.c
==============================================================================
--- trunk/src/ops/core_ops.c Wed May 26 12:29:29 2010 (r47022)
+++ trunk/src/ops/core_ops.c Wed May 26 17:36:45 2010 (r47023)
@@ -1333,8 +1333,8 @@
Parrot_root_new_p_pc_ic, /* 1263 */
Parrot_find_codepoint_i_s, /* 1264 */
Parrot_find_codepoint_i_sc, /* 1265 */
- Parrot_unroll_p, /* 1266 */
- Parrot_unroll_pc, /* 1267 */
+ Parrot_finalize_p, /* 1266 */
+ Parrot_finalize_pc, /* 1267 */
NULL /* NULL function pointer */
};
@@ -16540,9 +16540,9 @@
},
{ /* 1266 */
/* type PARROT_FUNCTION_OP, */
- "unroll",
- "unroll_p",
- "Parrot_unroll_p",
+ "finalize",
+ "finalize_p",
+ "Parrot_finalize_p",
/* "", body */
0,
2,
@@ -16552,9 +16552,9 @@
},
{ /* 1267 */
/* type PARROT_FUNCTION_OP, */
- "unroll",
- "unroll_pc",
- "Parrot_unroll_pc",
+ "finalize",
+ "finalize_pc",
+ "Parrot_finalize_pc",
/* "", body */
0,
2,
@@ -29172,7 +29172,7 @@
return (opcode_t *)cur_opcode + 3;}
opcode_t *
-Parrot_unroll_p(opcode_t *cur_opcode, PARROT_INTERP) {
+Parrot_finalize_p(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
/* Go to the next op after loop unrolling */
opcode_t * const dest =cur_opcode + 2;
@@ -29211,7 +29211,7 @@
return (opcode_t *)cur_opcode + 2;}
opcode_t *
-Parrot_unroll_pc(opcode_t *cur_opcode, PARROT_INTERP) {
+Parrot_finalize_pc(opcode_t *cur_opcode, PARROT_INTERP) {
const Parrot_Context * const CUR_CTX = Parrot_pcc_get_context_struct(interp, interp->ctx);
/* Go to the next op after loop unrolling */
opcode_t * const dest =cur_opcode + 2;
Modified: trunk/src/ops/experimental.ops
==============================================================================
--- trunk/src/ops/experimental.ops Wed May 26 12:29:29 2010 (r47022)
+++ trunk/src/ops/experimental.ops Wed May 26 17:36:45 2010 (r47023)
@@ -367,15 +367,16 @@
#endif
}
-=item B<unroll>(in PMC)
+=item B<finalize>(in PMC)
-Exception handling done, unroll possible inner runloops left. $1 is the
-Exception handled or the ExceptionHandler that is handling it.
+Finalize exception handling, freeing any information needed to resume
+the handled exception, like inner runloops.
+$1 is the Exception handled or the ExceptionHandler that is handling it.
EXPERIMENTAL. Handle with care.
=cut
-op unroll(in PMC) {
+op finalize(in PMC) {
/* Go to the next op after loop unrolling */
opcode_t * const dest = expr NEXT();
PMC *eh = PMCNULL;
Modified: trunk/t/pmc/exception-old.t
==============================================================================
--- trunk/t/pmc/exception-old.t Wed May 26 12:29:29 2010 (r47022)
+++ trunk/t/pmc/exception-old.t Wed May 26 17:36:45 2010 (r47023)
@@ -342,7 +342,7 @@
catch:
.get_results($P1)
say "caught"
- unroll $P1
+ finalize $P1
.return()
.end
More information about the parrot-commits
mailing list