Test suite results for test file tbs/tb0409.pp

Test run data :

Test file "tbs/tb0409.pp" information:

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

Detailed test run results:

Record count: 1

No log of 940537.

Source:

{ %version=1.1 }
type
   myl = type longint;

var
   i1,i2,i3 : myl;
   l : longint;

procedure p(i : myl);overload;
begin
end;

procedure p(i : longint);overload;
begin
end;

begin
   i1:=i2+i3;
   l:=i1+l;
   inc(i3);
end.

Link to SVN view of tbs/tb0409.pp source.