40 procedure perfExt_NewTurnBeginning; inline;

    40 procedure perfExt_NewTurnBeginning; inline;

    41 procedure perfExt_SaveBeganSynching; inline;

    41 procedure perfExt_SaveBeganSynching; inline;

    42 procedure perfExt_SaveFinishedSynching; inline;

    42 procedure perfExt_SaveFinishedSynching; inline;

    43 

    43 

    44 implementation

    44 implementation

    45 

    46 

    46 function isPhone: Boolean; inline;

    47 function isPhone: Boolean; inline;

    47 begin

    48 begin

    48 {$IFDEF IPHONEOS}

    49 {$IFDEF IPHONEOS}

    49     exit(isApplePhone());

    50     exit(isApplePhone());