* io.c (rb_io_initialize): should check fcntl result. [ruby-dev:23742]

git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@6497 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

2 files changed, 5 insertions, 0 deletions

diff --git a/ChangeLog b/ChangeLog
index 3b2abd115..52c2d81b9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Wed Jun 23 00:00:25 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* io.c (rb_io_initialize): should check fcntl result.  [ruby-dev:23742]
+
 Tue Jun 22 21:11:36 2004  Masaki Suketa  <masaki.suketa@nifty.ne.jp>
 
 	* ext/win32ole/win32ole.c (OLE_FREE): should not call CoFreeUnuse-
diff --git a/io.c b/io.c
index 54c3dee76..24fad23a4 100644
--- a/io.c
+++ b/io.c
@@ -3748,6 +3748,7 @@ rb_io_initialize(argc, argv, io)
     else {
 #if defined(HAVE_FCNTL) && defined(F_GETFL)
 	flags = fcntl(fd, F_GETFL);
+	if (flags == -1) rb_sys_fail(0);
 #else
 	flags = O_RDONLY;
 #endif