* 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: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@8810 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

2 files changed, 12 insertions, 3 deletions

diff --git a/ChangeLog b/ChangeLog
index 945cd4149..85904d774 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+Wed Jul 20 18:40:50 2005  Hirokazu Yamamoto  <ocean@m2.ccsnet.ne.jp>
+
+	* 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]
+
 Wed Jul 20 18:07:11 2005  Tanaka Akira  <akr@m17n.org>
 
 	* io.c (rb_io_ctl): update FMODE_WSPLIT_INITIALIZED and FMODE_WSPLIT 
diff --git a/io.c b/io.c
index e0e48ac3b..11bdc8591 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;