[svn:parrot] r46855 - branches/ops_pct/t/compilers/opsc

[bacek at svn.parrot.org]

Author: bacek
Date: Fri May 21 12:28:11 2010
New Revision: 46855
URL: https://trac.parrot.org/parrot/changeset/46855

Log:
Update test to refect ops removed from core.

Modified:
   branches/ops_pct/t/compilers/opsc/06-opsfile.t

Modified: branches/ops_pct/t/compilers/opsc/06-opsfile.t
==============================================================================
--- branches/ops_pct/t/compilers/opsc/06-opsfile.t	Fri May 21 12:27:53 2010	(r46854)
+++ branches/ops_pct/t/compilers/opsc/06-opsfile.t	Fri May 21 12:28:11 2010	(r46855)
@@ -22,7 +22,8 @@
 say( "# Parsed " ~ + at ops);
 # There is more than 300 ops in this 2 files.
 # Feel free to update number if you change them.
-ok(+ at ops == 314, "Ops parsed correctly");
+ok(+ at ops == 306, "Ops parsed correctly");
+say('# ' ~ + at ops);
 
 my $op := @ops[0];
 #_dumper($op);
@@ -31,7 +32,8 @@
 ok($op<code> == 0,      "... with code 0");
 
 $op := @ops[(+ at ops)-1];
-ok($op.name eq 'fact',  "Last op is fact");
+ok($op.name eq 'tanh',  "Last op is tanh");
+say('# ' ~ $op.name);
 ok($op<code> > 84 + 116,    "... with non zero code");
 
 my $version := join(' ', |$f.version);