Update of /cvsroot/compbench/CompBenchmarks++/CBM-PI/t
In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv19900
Modified Files:
00-XML.pl 01-CBMSystem-protected.pl 02-CBMSystem-benchs.pl
03-CBMCompilerSelector-public.pl
Log Message:
CBM namespace.
Index: 02-CBMSystem-benchs.pl
===================================================================
RCS file: /cvsroot/compbench/CompBenchmarks++/CBM-PI/t/02-CBMSystem-benchs.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** 02-CBMSystem-benchs.pl 17 Jan 2007 19:14:05 -0000 1.3
--- 02-CBMSystem-benchs.pl 21 Jan 2007 20:47:25 -0000 1.4
***************
*** 32,35 ****
--- 32,36 ----
next;
}
+
$p=$b->Package();
ok(defined($p), "package for $_");
Index: 01-CBMSystem-protected.pl
===================================================================
RCS file: /cvsroot/compbench/CompBenchmarks++/CBM-PI/t/01-CBMSystem-protected.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** 01-CBMSystem-protected.pl 28 Dec 2006 18:52:32 -0000 1.2
--- 01-CBMSystem-protected.pl 21 Jan 2007 20:47:25 -0000 1.3
***************
*** 71,77 ****
--- 71,80 ----
ok($num >= 1);
}
+ print "here\n";
$sys = CBM::Init();
+ print "there\n";
+
test_exec0();
test_arch();
Index: 03-CBMCompilerSelector-public.pl
===================================================================
RCS file: /cvsroot/compbench/CompBenchmarks++/CBM-PI/t/03-CBMCompilerSelector-public.pl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** 03-CBMCompilerSelector-public.pl 4 Jan 2007 19:37:50 -0000 1.3
--- 03-CBMCompilerSelector-public.pl 21 Jan 2007 20:47:25 -0000 1.4
***************
*** 34,38 ****
$sys = CBM::Init();
! my $CS = CBM::CBMCompilerSelector->new($sys);
my $reffile;
my $co;
--- 34,38 ----
$sys = CBM::Init();
! my $CS = CBM::CompilerSelector->new($sys);
my $reffile;
my $co;
Index: 00-XML.pl
===================================================================
RCS file: /cvsroot/compbench/CompBenchmarks++/CBM-PI/t/00-XML.pl,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 00-XML.pl 17 Jan 2007 19:14:40 -0000 1.1
--- 00-XML.pl 21 Jan 2007 20:47:25 -0000 1.2
***************
*** 71,76 ****
sub test_xml {
! my $root = CBM::CBMXMLNode->new("root");
! my $child = CBM::CBMXMLNode->new("child");
test_node($root, "root", undef, 0);
--- 71,76 ----
sub test_xml {
! my $root = CBM::XMLNode->new("root");
! my $child = CBM::XMLNode->new("child");
test_node($root, "root", undef, 0);
***************
*** 90,94 ****
test_str($root, "<root>\n <child/>\n root-value\n</root>\n");
! my $att0 = CBM::CBMXMLAttribute->new("att0");
test_attribute($att0, "att0", undef);
$root->add($att0);
--- 90,94 ----
test_str($root, "<root>\n <child/>\n root-value\n</root>\n");
! my $att0 = CBM::XMLAttribute->new("att0");
test_attribute($att0, "att0", undef);
$root->add($att0);
***************
*** 97,106 ****
sub test_xml_sample {
! my $root = CBM::CBMXMLNode->new("point");
$root->addAttribute("x", "0");
$root->addAttribute("y", "1");
$root->addAttribute("z", "-1");
! my $color = CBM::CBMXMLNode->new("color");
$color->addAttribute("mode", "plain");
$color->setValue("blue");
--- 97,106 ----
sub test_xml_sample {
! my $root = CBM::XMLNode->new("point");
$root->addAttribute("x", "0");
$root->addAttribute("y", "1");
$root->addAttribute("z", "-1");
! my $color = CBM::XMLNode->new("color");
$color->addAttribute("mode", "plain");
$color->setValue("blue");
|