fpc/tests/tbs/tb0461.pp
2003-11-07 17:25:47 +00:00

15 lines
95 B
ObjectPascal

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