From 4cf202180e47ace9e3e796c3a1d556a931df1ab3 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 2 Nov 2024 22:32:40 +0100
Subject: [PATCH]   * really fix bootstrapping with 3.2.2 on arm-linux

---
 rtl/inc/genmath.inc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/rtl/inc/genmath.inc b/rtl/inc/genmath.inc
index da6ee09006..fab4a01c38 100644
--- a/rtl/inc/genmath.inc
+++ b/rtl/inc/genmath.inc
@@ -1758,14 +1758,18 @@ end;
 
 {$ifndef FPC_SYSTEM_HAS_FRAC}
 {$push}
+{$ifndef VER3_2}
 { if we have to check manually fpu exceptions, then force the result assignment statement here to
   throw one }
 {$CHECKFPUEXCEPTIONS+}
 { turn off fastmath as it converts (d-d)/zero into 0 and thus not raising an exception }
 {$OPTIMIZATION NOFASTMATH}
+{$endif VER3_2}
 function fpc_frac_real(d : ValReal) : ValReal;compilerproc;
+{$ifndef VER3_2}
   const
     zero: ValReal = 0.0;
+{$endif VER3_2}
   begin
     { Nan or +/-Inf }
     if (float64high(d) and $7ff00000)=$7ff00000 then