Inicio Explorar Ayuda
Iniciar sesión
pascal
/
fpc
espejo de https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Archivos Incidencias 0 Wiki
Explorar el Código

* Fix bug ID #28737

git-svn-id: trunk@32727 -
michael hace 9 años
padre
d392f7043f
commit
891aaa9732
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
Unificar vista Mostrar estadísticas de diff
  1. 1 1
      rtl/objpas/sysutils/sysstrh.inc

+ 1 - 1
rtl/objpas/sysutils/sysstrh.inc
Ver fichero 

@@ -39,7 +39,7 @@ const
 
   MaxDateTime: TDateTime =  2958465.99999; { 12/31/9999 11:59:59.999 PM }
 
   MaxDateTime: TDateTime =  2958465.99999; { 12/31/9999 11:59:59.999 PM }
 
 
 
 {$if defined(FPC_HAS_TYPE_EXTENDED) or defined(FPC_HAS_TYPE_FLOAT128)}
 
 {$if defined(FPC_HAS_TYPE_EXTENDED) or defined(FPC_HAS_TYPE_FLOAT128)}
 
-  MinCurrency: Currency = -922337203685477.5807;
 
+  MinCurrency: Currency = -922337203685477.5808;
 
   MaxCurrency: Currency =  922337203685477.5807;
 
   MaxCurrency: Currency =  922337203685477.5807;
 
 {$else}
 
 {$else}
 
   MinCurrency: Currency = -922337203685477.0000;
 
   MinCurrency: Currency = -922337203685477.0000;