mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-21 13:52:35 +02:00
partial revert
This commit is contained in:
parent
887826cd7c
commit
00d5351b55
@ -57,7 +57,7 @@ function log2(x : float) : float;assembler;nostackframe;
|
|||||||
|
|
||||||
{$define FPC_MATH_HAS_SINCOS}
|
{$define FPC_MATH_HAS_SINCOS}
|
||||||
{$ifdef FPC_HAS_TYPE_EXTENDED}
|
{$ifdef FPC_HAS_TYPE_EXTENDED}
|
||||||
procedure sincos(theta : extended;out sinus,cosinus : extended);assembler;nostackframe;
|
procedure sincos(theta : extended;out sinus,cosinus : extended);assembler;
|
||||||
asm
|
asm
|
||||||
fldt theta
|
fldt theta
|
||||||
fsincos
|
fsincos
|
||||||
|
Loading…
Reference in New Issue
Block a user