hedgewars/uMobile.pas
changeset 6580 6155187bf599
parent 6247 6dfad55fd71c
child 6601 5965e2927b3d
equal deleted inserted replaced
6579:fc52f7c22c9b 6580:6155187bf599
    80 end;
    80 end;
    81 
    81 
    82 procedure AmmoUpdate; // do not inline
    82 procedure AmmoUpdate; // do not inline
    83 begin
    83 begin
    84 {$IFDEF IPHONEOS}
    84 {$IFDEF IPHONEOS}
    85     if (CurrentTeam = nil) or
    85     if (CurrentTeam = nil) or (CurrentTeam^.ExtDriven) or (CurrentTeam^.Hedgehogs[0].BotLevel <> 0) then
    86        (CurrentTeam^.ExtDriven) or
       
    87        (CurrentTeam^.Hedgehogs[0].BotLevel <> 0) then
       
    88         exit(); // the other way around throws a compiler error
    86         exit(); // the other way around throws a compiler error
    89     updateVisualsNewTurn();
    87     updateVisualsNewTurn();
    90 {$ENDIF}
    88 {$ENDIF}
    91 end;
    89 end;
    92 
    90