Просмотр исходного кода

* Better Min/MaxExtended values. Patch by Rika. Fixes issue #40026

Michaël Van Canneyt 1 месяц назад
Родитель
Сommit
a8fbddd7fa
1 измененных файлов с 3 добавлено и 2 удалено
  1. 3 2
      rtl/objpas/math.pp

+ 3 - 2
rtl/objpas/math.pp

@@ -90,8 +90,9 @@ Const
 {$endif FPC_HAS_TYPE_DOUBLE}
 {$ifdef FPC_HAS_TYPE_EXTENDED}
     const
-      MinExtended  =  3.4e-4932;
-      MaxExtended  =  1.1e+4932;
+      MinExtended  =  3.36210314311209350626e-4932;
+      MaxExtended  =  1.18973149535723176502e+4932;
+
 {$endif FPC_HAS_TYPE_EXTENDED}
 {$ifdef FPC_HAS_TYPE_COMP}
     const