|
@@ -50,6 +50,13 @@ const
|
|
|
Base types
|
|
Base types
|
|
|
*****************************************************************************}
|
|
*****************************************************************************}
|
|
|
type
|
|
type
|
|
|
|
|
+ Int8 = ShortInt;
|
|
|
|
|
+ UInt8 = Byte;
|
|
|
|
|
+ Int16 = SmallInt;
|
|
|
|
|
+ UInt16 = Word;
|
|
|
|
|
+ Int32 = Longint;
|
|
|
|
|
+ UInt32 = LongWord;
|
|
|
|
|
+
|
|
|
Integer = LongInt;
|
|
Integer = LongInt;
|
|
|
Cardinal = LongWord;
|
|
Cardinal = LongWord;
|
|
|
DWord = LongWord;
|
|
DWord = LongWord;
|
|
@@ -68,6 +75,7 @@ type
|
|
|
TTime = type TDateTime;
|
|
TTime = type TDateTime;
|
|
|
TDate = type TDateTime;
|
|
TDate = type TDateTime;
|
|
|
|
|
|
|
|
|
|
+
|
|
|
Int64 = type NativeInt unimplemented; // only 53 bits at runtime
|
|
Int64 = type NativeInt unimplemented; // only 53 bits at runtime
|
|
|
UInt64 = type NativeUInt unimplemented; // only 52 bits at runtime
|
|
UInt64 = type NativeUInt unimplemented; // only 52 bits at runtime
|
|
|
QWord = type NativeUInt unimplemented; // only 52 bits at runtime
|
|
QWord = type NativeUInt unimplemented; // only 52 bits at runtime
|
michael