freepascal.compiler/bugs/bug0156b.pp

unit bug0156b;
interface

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

end.