[Compbench-devel] CompBenchmarks++/CBM-PI/t 05-Plan.pl,1.2,1.3
Brought to you by:
xfred
From: Frederic T. <xf...@us...> - 2007-01-25 21:32:55
|
Update of /cvsroot/compbench/CompBenchmarks++/CBM-PI/t In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv7585 Modified Files: 05-Plan.pl Log Message: More tests. Index: 05-Plan.pl =================================================================== RCS file: /cvsroot/compbench/CompBenchmarks++/CBM-PI/t/05-Plan.pl,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 05-Plan.pl 25 Jan 2007 20:57:31 -0000 1.2 --- 05-Plan.pl 25 Jan 2007 21:32:50 -0000 1.3 *************** *** 6,10 **** require "libtest.pl"; ! use Test::Simple tests => 123; my $sys; --- 6,10 ---- require "libtest.pl"; ! use Test::Simple tests => 130; my $sys; *************** *** 37,40 **** --- 37,41 ---- ok($P->compilerOptionNumber() == 0, "options' number is correct"); ok($P->benchmarkNumber() == 0, "benchmark number is correct"); + ok($P->add($oc) == 0, "unique compiler"); $it++; } *************** *** 47,50 **** --- 48,52 ---- ok($P->compilerOptionNumber() == $it, "options' number is correct"); ok($P->benchmarkNumber() == 0, "benchmark number is correct"); + ok($P->add($o) == 0, "unique option"); $it++; } *************** *** 60,63 **** --- 62,66 ---- "options' number is correct"); ok($P->benchmarkNumber() == $it, "benchmark number is correct"); + ok($P->add($ob) == 0, "unique benchmark"); $it++; } |