当我声明一个通用的"T数组"时,我该如何处理内部错误?

Bof*_*ofA 13 delphi generics delphi-xe2

此单元无法使用"[DCC致命错误] Test.pas(22)在XE2 Update 3中编译:F2084内部错误:URW1147"

unit Test;

interface

type
  TSorter<T> = procedure(var Values: array of T);

  TTest = class
  public
    procedure Sort<T>(const Sorter: TSorter<T>);
  end;

implementation

procedure TTest.Sort<T>(const Sorter: TSorter<T>);
begin
end;

end.
Run Code Online (Sandbox Code Playgroud)

我已提交质量控制报告:QC#103671.

有没有人对此有解决方法?

Lin*_*nas 15

如果用TSorter<T> = procedure(var Values: TArray<T>);它替换TSorter声明,它在XE上编译正常.