From 82ad6fa9fa9ada240543c2b36bb0d93d442218a2 Mon Sep 17 00:00:00 2001
From: michael <michael@freepascal.org>
Date: Fri, 22 Dec 2017 07:41:09 +0000
Subject: [PATCH] * Temporary definition of TTime and TDate

---
 src/rtl/sysutils.pas | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/rtl/sysutils.pas b/src/rtl/sysutils.pas
index 85b97df..ebaa47a 100644
--- a/src/rtl/sysutils.pas
+++ b/src/rtl/sysutils.pas
@@ -314,7 +314,12 @@ Type
                             Date and time
 *****************************************************************************}
 Type
+  
   TDateTime = double;
+  
+  TTime = TDateTime;
+  TDate = TDateTime;
+  
   TSystemTime = record
      Year, Month, Day, DayOfWeek: word;
      Hour, Minute, Second, MilliSecond: word;