summaryrefslogtreecommitdiff
path: root/tests/webtbs/tw19452a.pp
blob: 89cd2daaf5475725564d1112a3fdf9f90964c59e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
{ %norun }

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

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

constructor TMyObject.Create(ar: Tarr);
begin
end;

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