From aff65afe97cc241af396ceb8df15bed27788c108 Mon Sep 17 00:00:00 2001
From: cremno <cremno@mail.ru>
Date: Fri, 11 Jul 2014 08:40:40 +0200
Subject: check the return value of `fwrite`

---
 src/dump.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/dump.c b/src/dump.c
index b820f1a68..e019baa99 100644
--- a/src/dump.c
+++ b/src/dump.c
@@ -952,7 +952,9 @@ mrb_dump_irep_binary(mrb_state *mrb, mrb_irep *irep, int debug_info, FILE* fp)
 
   result = mrb_dump_irep(mrb, irep, debug_info, &bin, &bin_size);
   if (result == MRB_DUMP_OK) {
-    fwrite(bin, bin_size, 1, fp);
+    if (fwrite(bin, sizeof(bin[0]), bin_size, fp) != bin_size) {
+      result = MRB_DUMP_WRITE_FAULT;
+    }
   }
 
   mrb_free(mrb, bin);
-- 
cgit v1.2.3