Repository URL to install this package:
|
Version:
3.2.0 ▾
|
{ %FAIL }
program tarray19;
{$mode objfpc}
{$modeswitch advancedrecords}
type
TTest = record
class operator Explicit(a: array of LongInt): TTest;
end;
class operator TTest.Explicit(a: array of LongInt): TTest;
begin
end;
var
t: TTest;
begin
t := [21, 42];
end.