浏览代码

* fixed 64 bit compilation

git-svn-id: trunk@6816 -
Jonas Maebe 18 年之前
父节点
当前提交
bdc378e250
共有 1 个文件被更改,包括 3 次插入3 次删除
  1. 3 3
      rtl/objpas/typinfo.pp

+ 3 - 3
rtl/objpas/typinfo.pp

@@ -839,9 +839,9 @@ begin
   if PropInfo^.PropType^.Kind in [tkInt64,tkQword
   { why do we have to handle classes here, see also below? (FK) }
 {$ifdef cpu64}
-    ,tkInterface,
-    ,tkInterfaceRaw,
-    ,tkDynArray,
+    ,tkInterface
+    ,tkInterfaceRaw
+    ,tkDynArray
     ,tkClass
 {$endif cpu64}
     ] then