fpc/tests/webtbs/tw38083.pp

20 lines
206 B
ObjectPascal

{ %NORUN }
program tw38083;
{$MODE Delphi}
procedure Test<T>(A: T; B: Boolean); overload;
begin
end;
procedure Test(A: String); overload;
begin
Test<String>(A, True);
end;
begin
end.