# HG changeset patch
# User unc0rr
# Date 1428755647 -10800
# Node ID 594f59bd1751970c9347fe918e632c0aca0a8320
# Parent  9b8e9813c6f812cc98c2c8dd5b799b6c62c561bb
Silly fixes for silly pas2c

diff -r 9b8e9813c6f8 -r 594f59bd1751 hedgewars/pas2cRedo.pas
--- a/hedgewars/pas2cRedo.pas	Fri Apr 10 23:58:05 2015 +0300
+++ b/hedgewars/pas2cRedo.pas	Sat Apr 11 15:34:07 2015 +0300
@@ -68,7 +68,7 @@
 
     new, dispose, FillChar, Insert, Delete, Move : procedure;
 
-    trunc, round : function : integer;
+    trunc, round, ceil : function : integer;
     abs, sqr : function : integer;
 
     StrPas, FormatDateTime, copy, str, PosS, trim, LowerCase : function : shortstring;
diff -r 9b8e9813c6f8 -r 594f59bd1751 hedgewars/uLandGraphics.pas
--- a/hedgewars/uLandGraphics.pas	Fri Apr 10 23:58:05 2015 +0300
+++ b/hedgewars/uLandGraphics.pas	Sat Apr 11 15:34:07 2015 +0300
@@ -875,14 +875,14 @@
                     gY:= (cpY + y) div 2;
                     end;
 		        if (not eraseOnLFMatch or (Land[cpY + y, cpX + x] and LandFlags <> 0)) and
-                    (PLongword(@(p^[x * 4]))^ and AMask <> 0) then
+                    ((PLongword(@(p^[x * 4]))^) and AMask <> 0) then
                     begin
                     if not onlyEraseLF then
                         begin
                         LandPixels[gY, gX]:= 0;
                         Land[cpY + y, cpX + x]:= 0
                         end
-                    else Land[cpY + y, cpX + x]:= Land[cpY + y, cpX + x] and not LandFlags
+                    else Land[cpY + y, cpX + x]:= Land[cpY + y, cpX + x] and (not LandFlags)
                     end
                 end;
         p:= PByteArray(@(p^[Image^.pitch]));