diff options
author | eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-05-27 05:58:32 +0000 |
---|---|---|
committer | eban <eban@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-05-27 05:58:32 +0000 |
commit | ec6cb67d037eb9f25f0e78215a07e4c6285f5739 (patch) | |
tree | ad7bb018f72cb4058fc859c1c0213813bd731326 | |
parent | decac03616d833b5e1ff02328e444ac658ebe9f2 (diff) | |
download | ruby-ec6cb67d037eb9f25f0e78215a07e4c6285f5739.tar.gz |
* io.c (rb_io_fwrite): workaround for bcc32's fwrite bug.
add errno checking. [ruby-dev:23627]
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@6415 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | io.c | 8 |
2 files changed, 11 insertions, 2 deletions
@@ -1,3 +1,8 @@ +Thu May 27 14:53:13 2004 WATANABE Hirofumi <eban@ruby-lang.org> + + * io.c (rb_io_fwrite): workaround for bcc32's fwrite bug. + add errno checking. [ruby-dev:23627] + Thu May 27 11:25:03 2004 NAKAMURA, Hiroshi <nakahiro@sarion.co.jp> * test/csv/test_csv.rb: illegal require module name (../lib/csv.rb). @@ -400,7 +400,7 @@ rb_io_fwrite(ptr, len, f) long n, r; if ((n = len) <= 0) return n; -#ifdef __human68k__ +#if defined __human68k__ || defined __BORLANDC__ do { if (fputc(*ptr++, f) == EOF) { if (ferror(f)) return -1L; @@ -409,7 +409,11 @@ rb_io_fwrite(ptr, len, f) } while (--n > 0); #else while (errno = 0, ptr += (r = fwrite(ptr, 1, n, f)), (n -= r) > 0) { - if (ferror(f)) { + if (ferror(f) +#if defined __BORLANDC__ + || errno == EBAF +#endif + ) { #ifdef __hpux if (!errno) errno = EAGAIN; #endif |