mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 23:31:49 +02:00
18 lines
151 B
ObjectPascal
18 lines
151 B
ObjectPascal
type
|
|
trecord = record
|
|
l : longint;
|
|
end;
|
|
|
|
function test : trecord;
|
|
begin
|
|
end;
|
|
|
|
procedure p(const c);
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
p(test);
|
|
end.
|
|
|