fpc/tests/tbs/tb0380.pp
2002-09-07 15:40:30 +00:00

11 lines
96 B
ObjectPascal

{ %version=1.1 }
uses ub0380;
procedure p1(s:string);overload;
begin
end;
begin
p1(1);
end.