Browse Source

------------------------------------------------------------------------
r46682 | pierre | 2020-08-25 06:34:29 +0000 (Tue, 25 Aug 2020) | 1 line

* Disable range and overflow checking inside softfpu implementation
------------------------------------------------------------------------
--- Merging r46682 into '.':
U rtl/inc/softfpu.pp
--- Recording mergeinfo for merge of r46682 into '.':
U .

git-svn-id: branches/fixes_3_2@47620 -

pierre 4 years ago
parent
commit
1439bd67b1
1 changed files with 17 additions and 0 deletions
  1. 17 0
      rtl/inc/softfpu.pp

+ 17 - 0
rtl/inc/softfpu.pp

@@ -556,6 +556,17 @@ implementation
 
 
 {$if not(defined(fpc_softfpu_interface))}
+
+{$ifdef FPC}
+  { disable range and overflow checking explicitly }
+  { This might be more essential for x80 and 128-bit
+    floating point types and could, maybe be
+    restricted to code handle flatx80 and float128 }
+  {$push}
+  {$R-}
+  {$Q-}
+{$endif FPC}
+
 (*****************************************************************************)
 (*----------------------------------------------------------------------------*)
 (* Primitive arithmetic functions, including multi-word arithmetic, and       *)
@@ -9367,4 +9378,10 @@ end;
 
 end.
 
+{$ifdef FPC}
+  { restore context modified at implmentation start
+    to possibly re-enable range and overflow checking explicitly}
+  {$pop}
+{$endif FPC}
+
 {$endif not(defined(fpc_softfpu_interface)) and not(defined(fpc_softfpu_implementation))}