2
0
Эх сурвалжийг харах

- removed i386 specific fpc_pchar_length implementation as it is much slower than the generic one which takes advantage of IndexByte

git-svn-id: trunk@33491 -
florian 9 жил өмнө
parent
commit
9b1e6e1976
1 өөрчлөгдсөн 0 нэмэгдсэн , 34 устгасан
  1. 0 34
      rtl/i386/i386.inc

+ 0 - 34
rtl/i386/i386.inc

@@ -989,40 +989,6 @@ end;
 {$endif FPC_SYSTEM_HAS_FPC_PCHAR_TO_SHORTSTR}
 
 
-{$ifndef FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH}
-{$define FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH}
-function fpc_pchar_length(p:pchar):sizeint;assembler;[public,alias:'FPC_PCHAR_LENGTH']; compilerproc;
-
-var
-  saveedi : longint;
-asm
-{$ifdef FPC_PROFILE}
-        push  %eax
-        push  %edx
-        push  %ecx
-        call  mcount
-        pop   %ecx
-        pop   %edx
-        pop   %eax
-{$endif FPC_PROFILE}
-        test    %eax,%eax
-        jz      .LStrLenDone
-        movl    %edi,saveedi
-        movl    %eax,%edi
-        movl    $0xffffffff,%ecx
-        xorl    %eax,%eax
-{$ifdef FPC_ENABLED_CLD}
-        cld
-{$endif FPC_ENABLED_CLD}
-        repne
-        scasb
-        movl    $0xfffffffe,%eax
-        subl    %ecx,%eax
-        movl    saveedi,%edi
-.LStrLenDone:
-end;
-{$endif FPC_SYSTEM_HAS_FPC_PCHAR_LENGTH}
-
 {$IFNDEF INTERNAL_BACKTRACE}
 {$define FPC_SYSTEM_HAS_GET_FRAME}
 function get_frame:pointer;assembler;nostackframe;{$ifdef SYSTEMINLINE}inline;{$endif}