paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-07 16:58:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Moved TDateTime/TTime/TDate to system unit

Browse Source
This commit is contained in:
michael 2018-06-25 07:11:12 +00:00
parent 5113c4f198
commit cff1e9dde9
2 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/rtl/system.pas
View File

@ -50,6 +50,10 @@ type
Real = type Double;
Extended = type Double;
TDateTime = type double;
TTime = type TDateTime;
TDate = type TDateTime;
Int64 = type NativeInt unimplemented; // only 53 bits at runtime
UInt64 = type NativeUInt unimplemented; // only 52 bits at runtime
QWord = type NativeUInt unimplemented; // only 52 bits at runtime

5
packages/rtl/sysutils.pas
View File

@ -316,11 +316,6 @@ Type
*****************************************************************************}
Type
TDateTime = type double;
TTime = type TDateTime;
TDate = type TDateTime;
TSystemTime = record
Year, Month, Day, DayOfWeek: word;
Hour, Minute, Second, MilliSecond: word;