fpcsrc/tests/tbs/ub0133.pp


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

{ Old file: tbs0156b.pp }
{  }

unit ub0133;
interface

type
       _win_st = record
            _parent : ^WINDOW;
         end;
        WINDOW = _win_st;

implementation

end.