summaryrefslogtreecommitdiff
path: root/rtl/aarch64/math.inc
diff options
context:
space:
mode:
Diffstat (limited to 'rtl/aarch64/math.inc')
-rw-r--r--rtl/aarch64/math.inc15
1 files changed, 13 insertions, 2 deletions
diff --git a/rtl/aarch64/math.inc b/rtl/aarch64/math.inc
index 8be40b21a8..6bdaebbcff 100644
--- a/rtl/aarch64/math.inc
+++ b/rtl/aarch64/math.inc
@@ -51,6 +51,19 @@
{$endif FPC_SYSTEM_HAS_SQRT}
+{$ifndef VER3_2}
+ {$ifndef FPC_SYSTEM_HAS_FRAC}
+ {$define FPC_SYSTEM_HAS_FRAC}
+ function fpc_frac_real(d : ValReal) : ValReal;compilerproc;
+ begin
+ { Function is handled internal in the compiler }
+ runerror(207);
+ result:=0;
+ end;
+ {$endif FPC_SYSTEM_HAS_FRAC}
+{$endif VER3_2}
+
+
{$ifndef FPC_SYSTEM_HAS_INT}
{$define FPC_SYSTEM_HAS_INT}
function fpc_int_real(d : ValReal) : ValReal;assembler;nostackframe;compilerproc;
@@ -82,5 +95,3 @@
fcvtzs x0,d0
end;
{$endif FPC_SYSTEM_HAS_ROUND}
-
-