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.
pas2c doesn't like semi-colons after repeat
authorsheepluva
Thu, 11 Dec 2014 15:20:23 +0100
changeset 10659 79e466c393f7
parent 10658 a3872ffdeab1
child 10660 79fa79c77c38
pas2c doesn't like semi-colons after repeat
hedgewars/uGearsHandlersMess.pas file | annotate | diff | comparison | revisions
hedgewars/uGearsUtils.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uGearsHandlersMess.pas	Thu Dec 11 07:52:51 2014 -0500
+++ b/hedgewars/uGearsHandlersMess.pas	Thu Dec 11 15:20:23 2014 +0100
@@ -4622,14 +4622,14 @@
         if WorldEdge = weWrap then
             begin
             if x > LongInt(rightX) then
-                repeat;
-                dec(x,  playWidth);
-                dec(rx, playWidth);
+                repeat
+                    dec(x,  playWidth);
+                    dec(rx, playWidth);
                 until x <= LongInt(rightX)
             else if x < LongInt(leftX) then
-                repeat;
-                inc(x,  playWidth);
-                inc(rx, playWidth);
+                repeat
+                    inc(x,  playWidth);
+                    inc(rx, playWidth);
                 until x >= LongInt(leftX);
             end
         else if (WorldEdge = weBounce) then
--- a/hedgewars/uGearsUtils.pas	Thu Dec 11 07:52:51 2014 -0500
+++ b/hedgewars/uGearsUtils.pas	Thu Dec 11 15:20:23 2014 +0100
@@ -105,7 +105,7 @@
 
 // we might have to run twice if weWrap is enabled
 wrap:= false;
-repeat;
+repeat
 
 fX:= int2hwFloat(X);
 fY:= int2hwFloat(Y);
hedgewars