Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix another pas2c hiccup in uLandObjects
authorWuzzy <Wuzzy2@mail.ru>
Thu, 04 Oct 2018 19:12:09 +0200
changeset 13833 664935d80668
parent 13832 10a3b80130b5
child 13836 ff468792298a
Fix another pas2c hiccup in uLandObjects
hedgewars/uLandObjects.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uLandObjects.pas	Thu Oct 04 19:04:27 2018 +0200
+++ b/hedgewars/uLandObjects.pas	Thu Oct 04 19:12:09 2018 +0200
@@ -204,7 +204,7 @@
                 pLandColor:= @LandPixels[(cpY + y) div 2, (cpX + x) div 2];
 
             alpha:= (color and AMask) shr AShift;
-            if (alpha <> $FF) and (pLandColor^ <> 0) then
+            if ((alpha <> $FF) and ((pLandColor^) <> 0)) then
                 begin
                 landColor:= pLandColor^;
                 color:=
hedgewars