mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-06-06 19:18:23 +02:00
* fix sincos also for x86-64-linux
git-svn-id: trunk@22926 -
This commit is contained in:
parent
a9fed57090
commit
a523d81b87
@ -62,7 +62,7 @@ procedure sincos(theta : single;out sinus,cosinus : single);assembler;
|
|||||||
var
|
var
|
||||||
t : single;
|
t : single;
|
||||||
asm
|
asm
|
||||||
movsd dword ptr t,xmm0
|
movss dword ptr t,xmm0
|
||||||
fld dword ptr t
|
fld dword ptr t
|
||||||
fsincos
|
fsincos
|
||||||
fstp dword ptr [cosinus]
|
fstp dword ptr [cosinus]
|
||||||
|
Loading…
Reference in New Issue
Block a user