tests/webtbs/tw19452.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

{ %norun }

{$mode objfpc}
type
  TMyObject = class
  public
    constructor Create(ar: array of TMyObject);
  end;

constructor TMyObject.Create(ar: array of TMyObject);
begin
end;

begin
  TMyObject.Create([nil]);
end.