Test suite results for test file tbs/tb0380.pp

Test run data :

t_id 597
t_version 1.1
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

tr_id	run	tr_ok	tr_skip	tr_result
523834577	947919	True	False	Successfully run

Record count: 1

{ %version=1.1 }

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

begin
  p1(1);
end.