summaryrefslogtreecommitdiff
path: root/lib/File
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-05-29 19:46:49 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-05-29 19:46:49 +0000
commitd51a9dd58c71fa3608611e3a69eda0c400e68509 (patch)
tree8dcf0ffff2eb380a1a11677878e409531b1c30f0 /lib/File
parent377cf4e94c16ff16a432d0f1739008a34b96bae4 (diff)
downloadperl-d51a9dd58c71fa3608611e3a69eda0c400e68509.tar.gz
OS/2: ENOINO.
p4raw-id: //depot/perl@16866
Diffstat (limited to 'lib/File')
-rw-r--r--lib/File/stat.t4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/File/stat.t b/lib/File/stat.t
index c29d9abecd..bd02466405 100644
--- a/lib/File/stat.t
+++ b/lib/File/stat.t
@@ -1,4 +1,4 @@
-#!./perl
+0#!./perl
BEGIN {
chdir 't' if -d 't';
@@ -76,6 +76,8 @@ SKIP: {
main::skip("Win32: different stat-info on filehandle", 1) if $^O eq 'MSWin32';
main::skip("dos: inode number is fake on dos", 1) if $^O eq 'dos';
+ main::skip("OS/2: inode number is not constant on os/2", 1) if $^O eq 'os2';
+
main::is( "@$stat", "@$stat3", '... and must match normal stat' );
}