mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-08 04:48:07 +02:00

refers to itself via a pointerdef in its parameter or result type(s) (mantis #25551) git-svn-id: trunk@26610 -
13 lines
98 B
ObjectPascal
13 lines
98 B
ObjectPascal
{ %norun }
|
|
|
|
type
|
|
PA = ^TA;
|
|
TA = function: PA;
|
|
|
|
function start: PA;
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
end.
|