branch | qmlfrontend |
changeset 12860 | 1b2b84315d27 |
parent 11833 | a69124eb7ce7 |
parent 12626 | d972b31f8881 |
--- a/hedgewars/uMisc.pas Thu Aug 11 23:05:14 2016 +0300 +++ b/hedgewars/uMisc.pas Sun Dec 17 00:09:24 2017 +0100 @@ -164,6 +164,7 @@ Rewrite(f, 1); if IOResult = 0 then begin + writeResult:= 0; // suppress fpc hint BlockWrite(f, head, sizeof(head), writeResult); BlockWrite(f, image^.buffer^, size, writeResult); Close(f);