paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-30 11:19:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

- removed obsolete USECMOV define

Browse Source 
git-svn-id: trunk@11645 -
This commit is contained in:
florian 2008-08-24 12:46:42 +00:00
parent 622ace494e
commit e27937106f
3 changed files with 9 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/fpcdefs.inc
View File

@ -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}

5
compiler/i386/cpupara.pas
View File

@ -135,6 +135,11 @@ unit cpupara;
exit;
end;
end;
procvardef:
begin
result:=false;
exit;
end;
end;
end;
end;

6
compiler/i386/popt386.pas
View File

@ -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;
@ -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