动态数组长度的 32 位和 64 位不同类型？

Question

我有一个 DUnitX 测试套件在 Win32 上运行良好。但是当我尝试为 Win64 编译它时，这一行会产生编译错误：

Assert.AreEqual(4, Length(r.Values));

[dcc64 错误] ...：E2532 无法从方法“AreEqual”的不同参数类型推断泛型类型参数

r.Values 定义为：

Type TIntegers = TArray<Integer>

Assert.AreEqual 有不同的重载实现，而 dcc64 无法选择正确的实现……好吧，但是为什么呢？为什么 dcc32 可以毫无问题地编译它？

我唯一的线索是，如果我用鼠标悬停，Delphi 会告诉我 Length 是 System.Smallint 类型。没有带有 Smallint 参数的 Assert.AreEqual 实现......果然，如果我将它转换为 Integer，dcc64 将编译它。

但这让我很烦恼。如果我查看 System.pas 单元，我可以看到 DynArraySetLength 采用 NativeInt 参数......一个 64 位整数（我希望是无符号的，但不确定）。那么为什么 Length 应该返回一个 16 位有符号整数呢？这似乎是等待发生的麻烦，对吧？

我错过了什么？

Answer 1

在 64 位中，TArray 的长度类型为 Int64。据我所知，Int64 没有 AreEqual 重载，因此它尝试使用通用版本：AreEqual<>。但看起来，从参数上看，它无法决定是哪一个。

所以在 Win64 中，这样做：

 Assert.AreEqual<Int64>(4, Length(r.Values));

或

 Assert.AreEqual(4, Integer(Length(r.Values)));

后者当然是最简单的，因为它应该在 Win32 和 Win64 中工作，但可能无法处理非常大的数组。

---

FWIW，Length 不返回 Smallint。但是对于平台之间不同的函数，尤其是像Length 这样的“编译器魔法”函数，可能会出现这样的（错误的）信息。这是 IDE 的问题，而不是编译器的问题。

更新：

正如@RemyLebeau 所说，改用NativeInt 可能更容易。这应该适用于 Win32 和 Win64，因为 NativeInt 在 Win32 中是 Int32 在 Win64 中是 Int64，这也是 _DynArrayLength 返回的内容：

Assert.AreEqual<NativeInt>(4, Length(r.Values));