projects
/
p5sagit/p5-mst-13.2.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
78ac6fa
)
ESUCCESS = 0 is not true, but exists.
Jarkko Hietaniemi [Wed, 6 Aug 2003 19:05:18 +0000 (19:05 +0000)]
p4raw-id: //depot/perl@20535
ext/Errno/t/Errno.t
patch
|
blob
|
blame
|
history
diff --git
a/ext/Errno/t/Errno.t
b/ext/Errno/t/Errno.t
index
02f5ce2
..
a879cf2
100755
(executable)
--- a/
ext/Errno/t/Errno.t
+++ b/
ext/Errno/t/Errno.t
@@
-26,7
+26,8
@@
print "not " unless &{"Errno::$err"} == $num;
print "ok 2\n";
$! = $num;
-print "not " unless $!{$err};
+# Some systems have ESUCCESS 0, that's why exists instead of boolean.
+print "not " unless exists $!{$err};
print "ok 3\n";
$! = 0;