{ %FAIL }
{ Old file: tbf0353.pp }
{  }

{ $version >= 1.1}
type
   ti = interface
     private
       procedure p;
   end;

begin
end.