Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uLandGenTemplateBased.pas
changeset 10562 3388822b3914
parent 10510 9329dab04490
child 10564 0cb20aa8877a 
--- a/hedgewars/uLandGenTemplateBased.pas	Sat Nov 29 01:19:29 2014 +0100
+++ b/hedgewars/uLandGenTemplateBased.pas	Sat Nov 29 03:13:06 2014 +0100
@@ -18,7 +18,7 @@
     with Template do
         begin
         pa.Count:= BasePointsCount;
-        for i:= 0 to pred(pa.Count) do
+        for i:= 0 to LongInt(pred(pa.Count)) do
             begin
             pa.ar[i].x:= BasePoints^[i].x + LongInt(GetRandom(BasePoints^[i].w));
             if pa.ar[i].x <> NTPX then
hedgewars