nostackframe

This commit is contained in:
Alligator-1 2024-08-26 16:27:31 +05:00 committed by Michael Van Canneyt
parent 37ad2c42ef
commit 8c3829e698

View File

@ -57,7 +57,7 @@ function log2(x : float) : float;assembler;nostackframe;
{$define FPC_MATH_HAS_SINCOS}
{$ifdef FPC_HAS_TYPE_EXTENDED}
procedure sincos(theta : extended;out sinus,cosinus : extended);assembler;
procedure sincos(theta : extended;out sinus,cosinus : extended);assembler;nostackframe;
asm
fldt theta
fsincos
@ -102,7 +102,7 @@ procedure sincos(theta : single;out sinus,cosinus : single);assembler;
{$define FPC_MATH_HAS_DIVMOD}
{$asmmode intel}
procedure DivMod(Dividend: Integer; Divisor: Word; var Result, Remainder: Word);assembler;
procedure DivMod(Dividend: Integer; Divisor: Word; var Result, Remainder: Word);assembler;nostackframe;
asm
{$ifdef WIN64}
mov eax, ecx
@ -123,7 +123,7 @@ asm
end;
procedure DivMod(Dividend: Integer; Divisor: Word; var Result, Remainder: SmallInt);assembler;
procedure DivMod(Dividend: Integer; Divisor: Word; var Result, Remainder: SmallInt);assembler;nostackframe;
asm
{$ifdef WIN64}
mov eax, ecx
@ -144,7 +144,7 @@ asm
end;
procedure DivMod(Dividend: DWord; Divisor: DWord; var Result, Remainder: DWord);assembler;
procedure DivMod(Dividend: DWord; Divisor: DWord; var Result, Remainder: DWord);assembler;nostackframe;
asm
{$ifdef WIN64}
mov eax, ecx
@ -164,7 +164,7 @@ asm
end;
procedure DivMod(Dividend: Integer; Divisor: Integer; var Result, Remainder: Integer);assembler;
procedure DivMod(Dividend: Integer; Divisor: Integer; var Result, Remainder: Integer);assembler;nostackframe;
asm
{$ifdef WIN64}
mov eax, ecx