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

- rm the 287/387+ FPU instructions from the requires_fwait_on_8087() list

Browse Source 
git-svn-id: trunk@26176 -
This commit is contained in:
nickysn 2013-12-03 22:48:52 +00:00
parent 71e492db1b
commit e9a4896565
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/x86/cpubase.pas
View File

@ -617,14 +617,14 @@ implementation
begin
case op of
A_F2XM1,A_FABS,A_FADD,A_FADDP,A_FBLD,A_FBSTP,A_FCHS,A_FCOM,A_FCOMP,
A_FCOMPP,A_FCOS,A_FDECSTP,A_FDISI,A_FDIV,A_FDIVP,A_FDIVR,A_FDIVRP,
A_FCOMPP,A_FDECSTP,A_FDISI,A_FDIV,A_FDIVP,A_FDIVR,A_FDIVRP,
A_FENI,A_FFREE,A_FIADD,A_FICOM,A_FICOMP,A_FIDIV,A_FIDIVR,A_FILD,
A_FIMUL,A_FINCSTP,A_FIST,A_FISTP,A_FISUB,A_FISUBR,A_FLD,A_FLD1,
A_FLDCW,A_FLDENV,A_FLDL2E,A_FLDL2T,A_FLDLG2,A_FLDLN2,A_FLDPI,A_FLDZ,
A_FMUL,A_FMULP,A_FNOP,A_FPATAN,A_FPREM,A_FPREM1,A_FPTAN,A_FRNDINT,
A_FRSTOR,A_FSAVE,A_FSCALE,A_FSIN,A_FSINCOS,A_FSQRT,A_FST,A_FSTCW,
A_FMUL,A_FMULP,A_FNOP,A_FPATAN,A_FPREM,A_FPTAN,A_FRNDINT,
A_FRSTOR,A_FSAVE,A_FSCALE,A_FSQRT,A_FST,A_FSTCW,
A_FSTENV,A_FSTP,A_FSTSW,A_FSUB,A_FSUBP,A_FSUBR,A_FSUBRP,A_FTST,
A_FUCOM,A_FUCOMP,A_FUCOMPP,A_FXAM,A_FXCH,A_FXTRACT,A_FYL2X,A_FYL2XP1:
A_FXAM,A_FXCH,A_FXTRACT,A_FYL2X,A_FYL2XP1:
result:=true;
else
result:=false;