summaryrefslogtreecommitdiff
path: root/avx512-0037785/rtl/aarch64/mathu.inc
diff options
context:
space:
mode:
Diffstat (limited to 'avx512-0037785/rtl/aarch64/mathu.inc')
-rw-r--r--avx512-0037785/rtl/aarch64/mathu.inc2
1 files changed, 1 insertions, 1 deletions
diff --git a/avx512-0037785/rtl/aarch64/mathu.inc b/avx512-0037785/rtl/aarch64/mathu.inc
index 469bb49eca..f55471e963 100644
--- a/avx512-0037785/rtl/aarch64/mathu.inc
+++ b/avx512-0037785/rtl/aarch64/mathu.inc
@@ -51,7 +51,7 @@ function SetRoundMode(const RoundMode: TFPURoundingMode): TFPURoundingMode;
rm2bits: array[TFPURoundingMode] of byte = (0,2,1,3);
begin
softfloat_rounding_mode:=RoundMode;
- SetRoundMode:=RoundMode;
+ SetRoundMode:=GetRoundMode;
setfpcr((getfpcr and $ff3fffff) or (rm2bits[RoundMode] shl 22));
end;