fpcsrc/tests/tbs/ub0437a.pp


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

{ %version=1.1}
unit ub0437a;

  interface

    type
      prec = ^trec;
      trec = record
      end;

  implementation

end.