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

* fixed assembling of sse instructions on x86-64 with regs > xmm7

Browse Source 
git-svn-id: trunk@6714 -
This commit is contained in:
florian 2007-03-04 19:16:20 +00:00
parent 37487d682e
commit e6e1a3a09b
2 changed files with 222 additions and 222 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

442
compiler/x86/x86ins.dat
View File

File diff suppressed because it is too large Load Diff

2
tests/test/tfpuover.pp
View File

@ -18,7 +18,7 @@ begin
{ Explanation a addnote needs the same number of fpu regs { Explanation a addnote needs the same number of fpu regs
that the max fpu need of left and right node, unless that the max fpu need of left and right node, unless
these two numbers are equal: these two numbers are equal:
this is the reason of the symetric form of this test code PM } this is the reason of the symmetric form of this test code PM }
z:=((((x+y)*(x-y))+((x+y)*(x-y)))+(((x+y)*(x-y))+((x+y)*(x-y)))+ z:=((((x+y)*(x-y))+((x+y)*(x-y)))+(((x+y)*(x-y))+((x+y)*(x-y)))+
(((x+y)*(x-y))+((x+y)*(x-y)))+(((x+y)*(x-y))+((x+y)*(x-y))))+ (((x+y)*(x-y))+((x+y)*(x-y)))+(((x+y)*(x-y))+((x+y)*(x-y))))+
((((x+y)*(x-y))+((x+y)*(x-y)))+(((x+y)*(x-y))+((x+y)*(x-y)))+ ((((x+y)*(x-y))+((x+y)*(x-y)))+(((x+y)*(x-y))+((x+y)*(x-y)))+