[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