Test suite results for test file tbs/tb0410.pp

Test run data :

Test file "tbs/tb0410.pp" information:

t_id 626
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 940471.

Source:

{ %version=1.1 }
uses
   variants;

procedure p1(f : single);
  begin
  end;

procedure p2(l : longint);
  begin
  end;

var
   v : variant;
   l : longint;

begin
   v:=1;
   p1(v);
   p2(v);
   l:=v;
end.

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