mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 08:28:08 +02:00
24 lines
202 B
ObjectPascal
24 lines
202 B
ObjectPascal
{ %NORUN }
|
|
|
|
program tw24285;
|
|
|
|
{$mode delphi}{$H+}
|
|
|
|
type
|
|
TA<T> = class
|
|
end;
|
|
|
|
TB<T> = class
|
|
public
|
|
type
|
|
TA = class(TA<T>)
|
|
end;
|
|
end;
|
|
|
|
type
|
|
TBLongInt = TB<LongInt>;
|
|
|
|
begin
|
|
|
|
end.
|