hedgewars/uMobile.pas
changeset 3952 d6412423da45
parent 3948 24daa33a3114
child 4034 634a8c8682de
equal deleted inserted replaced
3950:296cbdd85e50 3952:d6412423da45
    39 procedure perfExt_NewTurnBeginning; inline;
    39 procedure perfExt_NewTurnBeginning; inline;
    40 procedure perfExt_SaveBeganSynching; inline;
    40 procedure perfExt_SaveBeganSynching; inline;
    41 procedure perfExt_SaveFinishedSynching; inline;
    41 procedure perfExt_SaveFinishedSynching; inline;
    42 
    42 
    43 implementation
    43 implementation
    44 uses uTeams;
    44 uses uTeams, uConsole;
    45 
    45 
    46 function isPhone: Boolean; inline;
    46 function isPhone: Boolean; inline;
    47 begin
    47 begin
    48 {$IFDEF IPHONEOS}
    48 {$IFDEF IPHONEOS}
    49     exit(isApplePhone());
    49     exit(isApplePhone());