From: Debian Games Team <pkg-games-devel@lists.alioth.debian.org>
Date: Fri, 4 Jan 2019 20:07:05 +0000 (+0000)
Subject: a32b967f1341
X-Git-Tag: archive/raspbian/1.0.0-8+rpi1~1^2^2~2
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=3670e28a086760939b01cb76c814f9b8dd6cbea4;p=hedgewars.git

a32b967f1341

# HG changeset patch
# User nemo
# Date 1544721133 18000
# Node ID a32b967f13412b090e96bfb83ea1af3469fca389
# Parent  e8723f97324c09409c2b9bd35e0e2573b2918abd
This seems to be all that was needed for bug #719


Gbp-Pq: Name a32b967f1341.patch
---

diff --git a/project_files/hwc/rtl/fileio.c b/project_files/hwc/rtl/fileio.c
index 0965423..fee7a1d 100644
--- a/project_files/hwc/rtl/fileio.c
+++ b/project_files/hwc/rtl/fileio.c
@@ -186,7 +186,8 @@ void fpcrtl_blockRead__vars(File f, void *buf, Integer count, Integer *result) {
  */
 void fpcrtl_blockWrite__vars(File f, const void *buf, Integer count,
         Integer *result) {
-    assert(0);
+    assert(f->record_len > 0);
+    *result = fwrite(buf, f->record_len, count, f->fp);
 }
 
 bool fpcrtl_directoryExists(string255 dir) {