[svn:parrot] r37816 - in trunk: lib/Parrot src/ops
jkeenan at svn.parrot.org
jkeenan at svn.parrot.org
Mon Mar 30 02:31:40 UTC 2009
Author: jkeenan
Date: Mon Mar 30 02:31:38 2009
New Revision: 37816
URL: https://trac.parrot.org/parrot/changeset/37816
Log:
lib/Parrot/Ops2pm.pm: prepare_real_ops(): Deleting code which tests whether
opcodes have been renumbered upon addition/deletion of new, non-experimental
codes. Not appropriate post 1.0. Cf.:
https://trac.parrot.org/parrot/ticket/489.
src/ops/core.ops: Definition of load_language op was (presumably erroneously)
tucked inside POD block. Pulled it outside POD. Cf.: TT 489, comments 4 and
5.
Modified:
trunk/lib/Parrot/Ops2pm.pm
trunk/src/ops/core.ops
Modified: trunk/lib/Parrot/Ops2pm.pm
==============================================================================
--- trunk/lib/Parrot/Ops2pm.pm Sun Mar 29 19:49:05 2009 (r37815)
+++ trunk/lib/Parrot/Ops2pm.pm Mon Mar 30 02:31:38 2009 (r37816)
@@ -210,7 +210,7 @@
=item * Comment
It is at this point that warnings about experimental opcodes will be
-emitted. Example:
+emitted if you are working in a checkout from the Parrot repository. Example:
trap 1247 experimental, not in ops.num
@@ -285,9 +285,6 @@
if ( $n != $el->{CODE} ) {
die "op $opname: number mismatch: ops.num $n vs. core.ops $el->{CODE}";
}
- if ( $seq != $el->{CODE} ) {
- die "op $opname: sequence mismatch: ops.num $seq vs. core.ops $el->{CODE}";
- }
push @{ $real_ops->{OPS} }, $el;
++$seq;
}
Modified: trunk/src/ops/core.ops
==============================================================================
--- trunk/src/ops/core.ops Sun Mar 29 19:49:05 2009 (r37815)
+++ trunk/src/ops/core.ops Mon Mar 30 02:31:38 2009 (r37816)
@@ -170,13 +170,12 @@
Load the compiler libraries for a language $1. Search the library path to
locate the main compiler file in the standard locations.
+=cut
+
inline op load_language(in STR) :load_file {
Parrot_load_language(interp, $1);
}
-
-=cut
-
=back
=cut
More information about the parrot-commits
mailing list