Browse Source

* as restructuring TTypeData to correctly layout tkBool for 64-bit Booleans is basically impossible at least add a comment for tkBool to the tkInt64 and tkQWord branches

git-svn-id: trunk@35188 -
svenbarth 8 years ago
parent
commit
4717d78ac3
1 changed files with 2 additions and 0 deletions
  1. 2 0
      rtl/objpas/typinfo.pp

+ 2 - 0
rtl/objpas/typinfo.pp

@@ -279,8 +279,10 @@ unit typinfo;
                         {EnumUnitName: ShortString;})
                     );
 {$ifndef VER3_0}
+                  {tkBool with OrdType=otSQWord }
                   tkInt64:
                     (MinInt64Value, MaxInt64Value: Int64);
+                  {tkBool with OrdType=otUQWord }
                   tkQWord:
                     (MinQWordValue, MaxQWordValue: QWord);
 {$endif VER3_0}