From 810e37b1c3202eef6164933234d137d8d095e034 Mon Sep 17 00:00:00 2001
From: Tomoyuki Sahara <tsahara@iij.ad.jp>
Date: Thu, 17 Apr 2014 15:45:31 +0900
Subject: return value of syswrite may be less than length of given string.

---
 mrblib/io.rb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mrblib/io.rb b/mrblib/io.rb
index 4c69a4b99..249488ac4 100644
--- a/mrblib/io.rb
+++ b/mrblib/io.rb
@@ -99,7 +99,7 @@ class IO
     return str.size unless str.size > 0
 
     len = syswrite(str)
-    if str.size == len
+    if len != -1
       @pos += len
       return len
     end
-- 
cgit v1.2.3