mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 10:18:22 +02:00
20 lines
228 B
ObjectPascal
20 lines
228 B
ObjectPascal
program tw40784;
|
|
{$mode delphi}
|
|
|
|
uses uw40784a, uw40784b;
|
|
|
|
type
|
|
TSmetaUnitsCatalog = class(TCatCatalog<TObject>)
|
|
|
|
end;
|
|
|
|
TSmetaUnitsCatalog2 = class(TCatCatalog2<TObject>)
|
|
|
|
end;
|
|
|
|
|
|
begin
|
|
TSmetaUnitsCatalog.Create;
|
|
end.
|
|
|