Странная ошибка с анонимными методами в секции 'initialization'

Этот блок не компилируется в XE2 Update 3 с ошибкой "Internal Error: SY6315". В XE такой проблемы нет.

unit Test;

interface

uses
  SysUtils;

var
  Proc: TProc;

implementation

initialization
   Proc := procedure
    var ByteArr: array of Byte;
    begin
      SetLength(ByteArr, 10);
    end;

end.

Есть ли у кого-нибудь опыт решения этой проблемы?

Обновление: Я отправил отчет QC: QC#102888.

7
задан David Heffernan 25 January 2012 в 17:01
поделиться