Test suite results for test file webtbs/tw0802.pp

Test run data :

t_id 699
t_adddate 2003/10/03
t_result 0
t_knownrunerror 0

tr_id	run	tr_ok	tr_skip	tr_result
-839915342	724380	True	False	Successfully run

Record count: 1

program test;
  function testf (a:byte;b:integer;c:char):char;
  begin
    testf:=c;
  end;
begin
  writeln('"',testf(0,-1,'A'),'"');
end.