[svn:parrot] r38110 - trunk/lib/Parrot
jkeenan at svn.parrot.org
jkeenan at svn.parrot.org
Wed Apr 15 02:22:39 UTC 2009
Author: jkeenan
Date: Wed Apr 15 02:22:39 2009
New Revision: 38110
URL: https://trac.parrot.org/parrot/changeset/38110
Log:
Restoring previously deleted code, per Coke's comment in https://trac.parrot.org/parrot/ticket/489.
Modified:
trunk/lib/Parrot/Ops2pm.pm
Modified: trunk/lib/Parrot/Ops2pm.pm
==============================================================================
--- trunk/lib/Parrot/Ops2pm.pm Wed Apr 15 02:16:47 2009 (r38109)
+++ trunk/lib/Parrot/Ops2pm.pm Wed Apr 15 02:22:39 2009 (r38110)
@@ -285,6 +285,9 @@
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;
}
More information about the parrot-commits
mailing list