* io.c (wsplit_p): patch for the environment where

  fcntl(F_GETFL, O_NONBLOCK) is not supported. in that case,
  set FMODE_WSPLIT without fcntl check. [ruby-dev:26566]


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@8810 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 6 insertions, 3 deletions

diff --git a/io.c b/io.c
index e0e48ac3bc..11bdc85910 100644
--- a/io.c
+++ b/io.c
@@ -397,9 +397,12 @@ wsplit_p(OpenFile *fptr)
         struct stat buf;
         if (fstat(fileno(f), &buf) == 0 &&
             !(S_ISREG(buf.st_mode) ||
-              S_ISDIR(buf.st_mode)) &&
-            (r = fcntl(fileno(f), F_GETFL)) != -1 &&
-            !(r & O_NONBLOCK)) {
+              S_ISDIR(buf.st_mode))
+#if defined(HAVE_FCNTL) && defined(F_GETFL) && defined(O_NONBLOCK)
+            && (r = fcntl(fileno(f), F_GETFL)) != -1 &&
+            !(r & O_NONBLOCK)
+#endif
+            ) {
             fptr->mode |= FMODE_WSPLIT;
         }
         fptr->mode |= FMODE_WSPLIT_INITIALIZED;