浏览代码

* Delphi allows overloading based on Comp, so declare it as a type rename instead of a mere alias

git-svn-id: trunk@43775 -
svenbarth 5 年之前
父节点
当前提交
abe6e740f5
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/inc/systemh.inc

+ 1 - 1
rtl/inc/systemh.inc

@@ -473,7 +473,7 @@ Type
 
 {$if not declared(Comp)}
   { map comp to int64, but this doesn't mean we compile the comp support in! }
-  Comp = Int64;
+  Comp = type Int64;
 {$endif}
 
 { Zero - terminated strings }