Просмотр исходного кода

- removed obsolete USECMOV define

git-svn-id: trunk@11645 -
florian 17 лет назад
Родитель
Сommit
e27937106f
3 измененных файлов с 9 добавлено и 12 удалено
  1. 0 2
      compiler/fpcdefs.inc
  2. 6 1
      compiler/i386/cpupara.pas
  3. 3 9
      compiler/i386/popt386.pas

+ 0 - 2
compiler/fpcdefs.inc

@@ -53,7 +53,6 @@
   {$define x86}
   {$define cpuflags}
   {$define cpuextended}
-  {$define USECMOV}
   {$define SUPPORT_MMX}
   {$define cpumm}
   {$define fewintregisters}
@@ -67,7 +66,6 @@
   {$define cpuextended}
   {$define cpufloat128}
   {$define cputargethasfixedstack}
-  {$define USECMOV}
   {$define cpumm}
 {$endif x86_64}
 

+ 6 - 1
compiler/i386/cpupara.pas

@@ -135,6 +135,11 @@ unit cpupara;
                         exit;
                       end;
                   end;
+                procvardef:
+                  begin
+                    result:=false;
+                    exit;
+                  end;
               end;
             end;
         end;
@@ -474,7 +479,7 @@ unit cpupara;
                     if (side=callerside) or
                        (po_nostackframe in p.procoptions) then
                       paraloc^.reference.index:=NR_STACK_POINTER_REG
-                    else 
+                    else
                       paraloc^.reference.index:=NR_FRAME_POINTER_REG;
                     varalign:=used_align(size_2_align(l),paraalign,paraalign);
                     paraloc^.reference.offset:=parasize;

+ 3 - 9
compiler/i386/popt386.pas

@@ -1747,7 +1747,6 @@ end;
 
 procedure PeepHoleOptPass2(asml: TAsmList; BlockStart, BlockEnd: tai);
 
-{$ifdef  USECMOV}
   function CanBeCMOV(p : tai) : boolean;
     begin
        CanBeCMOV:=assigned(p) and (p.typ=ait_instruction) and
@@ -1763,15 +1762,12 @@ procedure PeepHoleOptPass2(asml: TAsmList; BlockStart, BlockEnd: tai);
          ) and
          (taicpu(p).oper[1]^.typ in [top_reg]);
     end;
-{$endif  USECMOV}
 
 var
   p,hp1,hp2: tai;
-{$ifdef  USECMOV}
   l : longint;
   condition : tasmcond;
   hp3: tai;
-{$endif USECMOV}
   UsedRegs, TmpUsedRegs: TRegSet;
   carryadd_opcode: Tasmop;
 
@@ -1790,10 +1786,10 @@ begin
                   { jb @@1                            cmc
                     inc/dec operand           -->     adc/sbb operand,0
 		  @@1:
-		  
+		
 		  ... and ...
-		  
-                    jnb @@1                            
+		
+                    jnb @@1
                     inc/dec operand           -->     adc/sbb operand,0
 		  @@1: }
                   if GetNextInstruction(p,hp1) and (hp1.typ=ait_instruction) and
@@ -1839,7 +1835,6 @@ begin
                             end;
                         end;
                     end;
-{$ifdef USECMOV}
                   if (current_settings.cputype>=cpu_Pentium2) then
                     begin
                        { check for
@@ -1962,7 +1957,6 @@ begin
                               end;
                          end;
                     end;
-{$endif USECMOV}
                 end;
               A_FSTP,A_FISTP:
                 if doFpuLoadStoreOpt(asmL,p) then