fpc/tests/tbs/tb0461.pp
2024-10-31 22:35:04 +01:00

13 lines
77 B
ObjectPascal

{ %recompile }
uses ub0461;
procedure p;
begin
p1;
end;
begin
p;
end.