paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 22:14:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed test crash with -Cg on non-Darwin targets: the GOT slot stores address of symbol, not its value.

Browse Source 
git-svn-id: trunk@21974 -
This commit is contained in:
sergei 2012-07-26 14:52:22 +00:00
parent 44fd18a041
commit 1763309d8e
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/test/testsse2.pp
View File

@ -24,9 +24,11 @@ begin
{$else darwin} {$else darwin}
addl $_GLOBAL_OFFSET_TABLE_+1,%ecx addl $_GLOBAL_OFFSET_TABLE_+1,%ecx
movdqa %xmm1,%xmm2 movdqa %xmm1,%xmm2
movdqa q@GOT(%ecx),%xmm4 movl q@GOT(%ecx),%eax
movdqa (%eax),%xmm4
psubq %xmm1,%xmm2 psubq %xmm1,%xmm2
psubq q@GOT(%ecx),%xmm4 movl q@GOT(%ecx),%eax
psubq (%eax),%xmm4
{$endif darwin} {$endif darwin}
{$else FPC_PIC} {$else FPC_PIC}
movdqa %xmm1,%xmm2 movdqa %xmm1,%xmm2