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

10 lines
79 B
ObjectPascal

uses ub0380;
procedure p1(s:string);overload;
begin
end;
begin
p1(1);
end.