tests/webtbf/tw35149a.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14

{ %fail }

program project1;

{$mode objfpc}
type
  TestObject = object
  var
    TestNested: Integer;
  end;

begin
  writeln(TestObject.TestNested);
end.