Fix build
authorunc0rr
Wed, 09 Jan 2013 10:16:10 +0400
changeset 8368 6feae8073965
parent 8366 67c7ba2b82a3
child 8369 31033e521653
Fix build
hedgewars/uScript.pas
--- a/hedgewars/uScript.pas	Tue Jan 08 00:40:20 2013 +0400
+++ b/hedgewars/uScript.pas	Wed Jan 09 10:16:10 2013 +0400
@@ -230,7 +230,7 @@
 begin
     for i:= 1 to lua_gettop(L) do
         if (GameFlags and lua_tointeger(L, i)) = 0 then
-            GameFlags += lua_tointeger(L, i);
+            GameFlags := GameFlags + lua_tointeger(L, i);
     ScriptSetInteger('GameFlags', GameFlags);
 end;
 
@@ -239,7 +239,7 @@
 begin
     for i:= 1 to lua_gettop(L) do
         if (GameFlags and lua_tointeger(L, i)) <> 0 then
-            GameFlags -= lua_tointeger(L, i);
+            GameFlags := GameFlags - lua_tointeger(L, i);
     ScriptSetInteger('GameFlags', GameFlags);
 end;