Change 34088 by [EMAIL PROTECTED] on 2008/06/25 19:49:38
qx($nosuchfile) isn't portable (Windows whines on STDERR)
so skip these uninit var tests for now
Affected files ...
... //depot/perl/t/lib/warnings/9uninit#32 edit
Differences ...
==== //depot/perl/t/lib/warnings/9uninit#32 (text) ====
Index: perl/t/lib/warnings/9uninit
--- perl/t/lib/warnings/9uninit#31~34084~ 2008-06-24 06:30:23.000000000
-0700
+++ perl/t/lib/warnings/9uninit 2008-06-25 12:49:38.000000000 -0700
@@ -1419,8 +1419,8 @@
my $nofile = '/no/such/file';
my $nocmd = '/no/such/command';
my $v;
-$v = 1 + `$nocmd`;
-$v = 1 + qx($nocmd);
+# *** `` not tested: Windows produces and error on STDERR
+# *** ditto qx()
my $f = "";
$v = 1 + open($f, $nofile);
# *** pipe() not tested
@@ -1502,8 +1502,6 @@
{ my $x = -1; $v = 1 + sysseek(STDIN, $x, 0); }
EXPECT
-Use of uninitialized value in addition (+) at - line 8.
-Use of uninitialized value in addition (+) at - line 9.
Use of uninitialized value in addition (+) at - line 11.
Use of uninitialized value in addition (+) at - line 13.
Use of uninitialized value in addition (+) at - line 14.
End of Patch.
