oops, IOResult is a function in pascal, but not in pas2c
authorsheepluva
Tue, 02 Dec 2014 20:20:04 +0100
changeset 10605 df7a73db2c43
parent 10604 f2f9928ea2e7
child 10606 8e95911cb86b
child 10607 532d43f3d6f9
oops, IOResult is a function in pascal, but not in pas2c
hedgewars/uUtils.pas
--- a/hedgewars/uUtils.pas	Tue Dec 02 14:26:16 2014 -0500
+++ b/hedgewars/uUtils.pas	Tue Dec 02 20:20:04 2014 +0100
@@ -559,7 +559,8 @@
             begin
             assign(logFile, shortstring(UserPathPrefix) + '/Logs/' + logfileBase + inttostr(i) + '.log');
             Rewrite(logFile);
-            rwfailed:= (IOResult() <> 0);
+            // note: IOResult is a function in pascal and a variable in pas2c
+            rwfailed:= (IOResult <> 0);
             if (not rwfailed) then
                 break;
             inc(i)