fpc/tests/webtbs/tw18085.pp

22 lines
258 B
ObjectPascal

program Project1;
{$mode delphi}
uses
uw18087a, uw18087b;
type
TFoo1 = class
strict private
type
TFoo2 = record
end;
TFoo3 = class
FFoo2: TFoo2; // was error: Identifier not found "TFoo2"
end;
end;
begin
end.