* Moved TDateTime/TTime/TDate to system unit

packages/rtl/system.pas

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

packages/rtl/sysutils.pas

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