mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2026-01-07 07:30:32 +01: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.
|