[File-extattr-commits] File-ExtAttr/t 80memleakget.t,1.1,1.2

[Richard D. <ric...@us...>]

Update of /cvsroot/file-extattr/File-ExtAttr/t
In directory sc8-pr-cvs17:/tmp/cvs-serv14772/t

Modified Files:
	80memleakget.t 
Log Message:
1000 cycles per file/dir/file handle should be enough to diagnose memleaks in the future

Index: 80memleakget.t
===================================================================
RCS file: /cvsroot/file-extattr/File-ExtAttr/t/80memleakget.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 80memleakget.t	13 Aug 2007 12:02:28 -0000	1.1
--- 80memleakget.t	13 Aug 2007 12:04:35 -0000	1.2
***************
*** 21,25 ****
    plan skip_all => 'Tests unsupported on this OS/filesystem';
  } else {
!   plan tests => 60000;
  }
  
--- 21,25 ----
    plan skip_all => 'Tests unsupported on this OS/filesystem';
  } else {
!   plan tests => 6000;
  }
  
***************
*** 79,83 ****
      || die "setfattr failed on file descriptor ".$fh->fileno().": $!"; 
  
! for (my $i = 0; $i < 10000; $i++) {
      # Check for the existing attribute.
      is(getfattr($fh, $key), $val);
--- 79,83 ----
      || die "setfattr failed on file descriptor ".$fh->fileno().": $!"; 
  
! for (my $i = 0; $i < 1000; $i++) {
      # Check for the existing attribute.
      is(getfattr($fh, $key), $val);