fpcsrc/tests/tbs/tb0243.pp


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

{ Old file: tbs0284b.pp }
{  }

unit tb0243;
interface
type
  o1=object
    p : longint;
  end;

implementation
end.