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

* mm register spilling fixed

Browse Source 
* no sse instruction can operate on memory

git-svn-id: trunk@762 -
This commit is contained in:
florian 2005-07-27 19:31:31 +00:00
parent fe5bd6902d
commit 0e89afa607
1 changed files with 23 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
compiler/x86/rgx86.pas
View File

@ -142,7 +142,7 @@ implementation
(getsupreg(oper[0]^.reg)=orgreg) then
replaceoper:=0
else
if (getregtype(oper[0]^.reg)=regtype) and
if (getregtype(oper[1]^.reg)=regtype) and
(getsupreg(oper[1]^.reg)=orgreg) then
replaceoper:=1
else
@ -177,6 +177,28 @@ implementation
A_DIVSS,
A_SHLD,
A_SHRD,
A_CVTDQ2PD,
A_CVTDQ2PS,
A_CVTPD2DQ,
A_CVTPD2PI,
A_CVTPD2PS,
A_CVTPI2PD,
A_CVTPS2DQ,
A_CVTPS2PD,
A_CVTSD2SI,
A_CVTSD2SS,
A_CVTSI2SD,
A_CVTSS2SD,
A_CVTTPD2PI,
A_CVTTPD2DQ,
A_CVTTPS2DQ,
A_CVTTSD2SI,
A_CVTPI2PS,
A_CVTPS2PI,
A_CVTSI2SS,
A_CVTSS2SI,
A_CVTTPS2PI,
A_CVTTSS2SI,
A_IMUL :
replaceoper:=-1;
end;