[svn:parrot] r44521 - branches/ops_pct/compilers/opsc/t
bacek at svn.parrot.org
bacek at svn.parrot.org
Sat Feb 27 00:32:34 UTC 2010
Author: bacek
Date: Sat Feb 27 00:32:34 2010
New Revision: 44521
URL: https://trac.parrot.org/parrot/changeset/44521
Log:
Update ops count in test.
Modified:
branches/ops_pct/compilers/opsc/t/04-oplib_parse_ops.t
Modified: branches/ops_pct/compilers/opsc/t/04-oplib_parse_ops.t
==============================================================================
--- branches/ops_pct/compilers/opsc/t/04-oplib_parse_ops.t Sat Feb 27 00:32:10 2010 (r44520)
+++ branches/ops_pct/compilers/opsc/t/04-oplib_parse_ops.t Sat Feb 27 00:32:34 2010 (r44521)
@@ -19,18 +19,21 @@
$lib.parse_ops();
-# 86 core
+# 84 core
# 116 math
-ok(+($lib.ops_past) == 86 + 116, "ops file parsed");
+ok(+($lib.ops_past) == 84 + 116, "ops file parsed");
+say("# count " ~+$lib.ops_past);
+#_dumper($lib.ops_past);
# It's 1258 currently. But testing for exact match isn't nessary.
ok( $lib.max_op_num > 1200, "ops.num file parsed");
# Check couple random ops.
ok( $lib.optable<end> == 0, "'end' have code 0");
-ok( $lib.optable<set_args_pc> == 42, "'set_args_pc' have code 42");
+ok( $lib.optable<set_addr_p_i> == 42, "'set_addr_p_i' have code 42");
ok( $lib.skiptable<abs_i_ic>, "'abs_i_ic' in skiptable");
ok( $lib.skiptable<ne_nc_nc_ic>, "'ne_nc_nc_ic' in skiptable");
+#_dumper($lib.skiptable);
# vim: expandtab shiftwidth=4 ft=perl6:
More information about the parrot-commits
mailing list