* io.c (rb_io_fwrite): separated from io_write().

* marshal.c (w_byten): use rb_io_fwrite() to support non-blocking
  IO, and added error check.

* rubyio.h: prototypes; rb_io_fwrite


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

1 files changed, 2 insertions, 1 deletions

diff --git a/marshal.c b/marshal.c
index 25d08ac471..e90879a35d 100644
--- a/marshal.c
+++ b/marshal.c
@@ -102,7 +102,8 @@ w_byten(s, n, arg)
     struct dump_arg *arg;
 {
     if (arg->fp) {
-	fwrite(s, 1, n, arg->fp);
+	if (rb_io_fwrite(s, n, arg->fp) < 0)
+	    rb_sys_fail(0);
     }
     else {
 	VALUE buf = arg->str;