fpc/tests/webtbs/tw25551.pp
Jonas Maebe 2adfb6cdda * don't endlessly recurse when printing the typename of a procvardef that
refers to itself via a pointerdef in its parameter or result type(s)
    (mantis #25551)

git-svn-id: trunk@26610 -
2014-01-28 20:14:31 +00:00

13 lines
98 B
ObjectPascal

{ %norun }
type
PA = ^TA;
TA = function: PA;
function start: PA;
begin
end;
begin
end.