Update of /cvsroot/compbench/CompBenchmarks++/CBM-PI/t
In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv15763
Modified Files:
00-XML.pl
Log Message:
New test on getAttribute(); (prevent regression).
Index: 00-XML.pl
===================================================================
RCS file: /cvsroot/compbench/CompBenchmarks++/CBM-PI/t/00-XML.pl,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** 00-XML.pl 25 Jan 2007 16:58:07 -0000 1.6
--- 00-XML.pl 12 Apr 2007 19:59:28 -0000 1.7
***************
*** 6,10 ****
require "libtest.pl";
! use Test::Simple tests => 44;
my $sys;
--- 6,10 ----
require "libtest.pl";
! use Test::Simple tests => 45;
my $sys;
***************
*** 102,105 ****
--- 102,107 ----
test_attribute($root->getAttribute(0), "att0", "");
test_attribute($root->getAttribute("att0"), "att0", "");
+
+ ok(!defined($root->getAttribute("att0XY-notdef")), "regression : checking if NULL is returned on non-existing attributes");
}
|
