You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
24 lines
648 B
24 lines
648 B
|
|
# HG changeset patch
|
|
# User alfadur
|
|
# Date 1597053413 -10800
|
|
# Node ID 6832dab555aefa6ef2830d9452a9a88c89299e85
|
|
# Parent eee2b3eff91dec595a7cb486bcfd97036520e971
|
|
workaround for FPC 3.2.0 ICE
|
|
|
|
diff -r eee2b3eff91d -r 6832dab555ae hedgewars/uWorld.pas
|
|
--- a/hedgewars/uWorld.pas Sun Aug 09 14:43:02 2020 +0200
|
|
+++ b/hedgewars/uWorld.pas Mon Aug 10 12:56:53 2020 +0300
|
|
@@ -1168,8 +1168,8 @@
|
|
procedure ShiftWorld(Dir: LongInt); inline;
|
|
begin
|
|
preShiftWorldDx:= WorldDx;
|
|
- WorldDx:= WorldDx + LongInt(Dir * LongInt(playWidth));
|
|
-
|
|
+ Dir := Dir * LongInt(playWidth);
|
|
+ WorldDx:= WorldDx + Dir;
|
|
end;
|
|
|
|
procedure UnshiftWorld(); inline;
|
|
|