hedgewars/uIO.pas
changeset 10562 3388822b3914
parent 10560 9f09196d92a6
child 10606 8e95911cb86b
child 10663 9bbb29d2bd68
--- a/hedgewars/uIO.pas	Sat Nov 29 01:19:29 2014 +0100
+++ b/hedgewars/uIO.pas	Sat Nov 29 03:13:06 2014 +0100
@@ -426,7 +426,7 @@
     end;
 
 if (headcmd <> nil) and tmpflag and (not CurrentTeam^.hasGone) then
-    TryDo(GameTicks < hiTicks shl 16 + headcmd^.loTime,
+    TryDo(GameTicks < LongWord(hiTicks shl 16) + headcmd^.loTime,
             'oops, queue error. in buffer: ' + headcmd^.cmd +
             ' (' + IntToStr(GameTicks) + ' > ' +
             IntToStr(hiTicks shl 16 + headcmd^.loTime) + ')',