{ %norun }

type
    PA = ^TA;
    TA = function: PA;

function start: PA;
begin
end;

begin
end.