* io.c (rb_io_initialize): [ruby-dev:24962]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@7384 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
matz 2004-11-26 05:30:45 +00:00
Родитель 9e5c4cde2f
Коммит c97c359053
2 изменённых файлов: 14 добавлений и 10 удалений

Просмотреть файл

@ -1,3 +1,7 @@
Fri Nov 26 14:29:39 2004 Yukihiro Matsumoto <matz@ruby-lang.org>
* io.c (rb_io_initialize): [ruby-dev:24962]
Fri Nov 26 13:49:06 2004 Yukihiro Matsumoto <matz@ruby-lang.org>
* io.c (rb_io_initialize): should retrieve flags from copying file

20
io.c
Просмотреть файл

@ -3958,10 +3958,6 @@ rb_io_initialize(argc, argv, io)
rb_secure(4);
rb_scan_args(argc, argv, "11", &fnum, &mode);
orig = rb_io_check_io(fnum);
if (NIL_P(orig)) {
fd = NUM2INT(fnum);
}
if (argc == 2) {
if (FIXNUM_P(mode)) {
flags = FIX2LONG(mode);
@ -3971,14 +3967,18 @@ rb_io_initialize(argc, argv, io)
flags = rb_io_mode_modenum(RSTRING(mode)->ptr);
}
}
orig = rb_io_check_io(fnum);
if (NIL_P(orig)) {
fd = NUM2INT(fnum);
}
else {
if (!NIL_P(orig)) {
GetOpenFile(orig, ofp);
if (ofp->refcnt == LONG_MAX) {
VALUE s = rb_inspect(orig);
rb_raise(rb_eIOError, "too many shared IO for %s", StringValuePtr(s));
}
GetOpenFile(orig, ofp);
if (ofp->refcnt == LONG_MAX) {
VALUE s = rb_inspect(orig);
rb_raise(rb_eIOError, "too many shared IO for %s", StringValuePtr(s));
}
}
if (argc != 2) {
#if defined(HAVE_FCNTL) && defined(F_GETFL)
flags = fcntl(fd, F_GETFL);
if (flags == -1) rb_sys_fail(0);