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

+ Aarch64: UMul64x64_128 assembler implementation

Browse Source
This commit is contained in:
florian 2025-03-16 10:32:47 +01:00
parent 28c14ff345
commit ddd846ede4
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/aarch64/aarch64.inc
View File

@ -582,3 +582,10 @@ asm
rev x0, x0
end;
{$define FPC_SYSTEM_HAS_UMUL64X64_128}
function UMul64x64_128(a,b: uint64; out rHi: uint64): uint64; assembler; nostackframe;
asm
umulh x3,x0,x1
mul x0,x0,x1
str x3,[x2]
end;