paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 09:06:02 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug ID #28737

Browse Source 
git-svn-id: trunk@32727 -
This commit is contained in:
michael 2015-12-26 15:15:34 +00:00
parent d392f7043f
commit 891aaa9732
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/objpas/sysutils/sysstrh.inc
View File

@ -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;