mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 22:49:23 +02:00
parent
0b5bc00855
commit
94d222ba69
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -17347,6 +17347,7 @@ tests/webtbs/tw26749.pp svneol=native#text/pascal
|
|||||||
tests/webtbs/tw2676.pp svneol=native#text/plain
|
tests/webtbs/tw2676.pp svneol=native#text/plain
|
||||||
tests/webtbs/tw26773.pp svneol=native#text/plain
|
tests/webtbs/tw26773.pp svneol=native#text/plain
|
||||||
tests/webtbs/tw2678.pp svneol=native#text/plain
|
tests/webtbs/tw2678.pp svneol=native#text/plain
|
||||||
|
tests/webtbs/tw26791.pp svneol=native#text/pascal
|
||||||
tests/webtbs/tw2690.pp svneol=native#text/plain
|
tests/webtbs/tw2690.pp svneol=native#text/plain
|
||||||
tests/webtbs/tw2691.pp svneol=native#text/plain
|
tests/webtbs/tw2691.pp svneol=native#text/plain
|
||||||
tests/webtbs/tw26922.pp svneol=native#text/pascal
|
tests/webtbs/tw26922.pp svneol=native#text/pascal
|
||||||
|
12
tests/webtbs/tw26791.pp
Normal file
12
tests/webtbs/tw26791.pp
Normal file
@ -0,0 +1,12 @@
|
|||||||
|
{ %opt=-vw -Sew }
|
||||||
|
{ %cpu=x86_64,i386 }
|
||||||
|
Function Fast_ReciprocalSquareRoot(number: Single): Single;
|
||||||
|
Begin
|
||||||
|
Asm
|
||||||
|
RSQRTSS number, %xmm0
|
||||||
|
MOVLPS %xmm0, __Result
|
||||||
|
End ['xmm0'];
|
||||||
|
End;
|
||||||
|
|
||||||
|
begin
|
||||||
|
end.
|
Loading…
Reference in New Issue
Block a user