hedgewars/uIO.pas
changeset 10562 3388822b3914
parent 10560 9f09196d92a6
child 10606 8e95911cb86b
child 10663 9bbb29d2bd68
equal deleted inserted replaced
10560:9f09196d92a6 10562:3388822b3914
   424         end;
   424         end;
   425     RemoveCmd
   425     RemoveCmd
   426     end;
   426     end;
   427 
   427 
   428 if (headcmd <> nil) and tmpflag and (not CurrentTeam^.hasGone) then
   428 if (headcmd <> nil) and tmpflag and (not CurrentTeam^.hasGone) then
   429     TryDo(GameTicks < hiTicks shl 16 + headcmd^.loTime,
   429     TryDo(GameTicks < LongWord(hiTicks shl 16) + headcmd^.loTime,
   430             'oops, queue error. in buffer: ' + headcmd^.cmd +
   430             'oops, queue error. in buffer: ' + headcmd^.cmd +
   431             ' (' + IntToStr(GameTicks) + ' > ' +
   431             ' (' + IntToStr(GameTicks) + ' > ' +
   432             IntToStr(hiTicks shl 16 + headcmd^.loTime) + ')',
   432             IntToStr(hiTicks shl 16 + headcmd^.loTime) + ')',
   433             true);
   433             true);
   434 
   434