Test suite results for test file tbs/tb0047.pp

Test run data :

Test file "tbs/tb0047.pp" information:

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

Detailed test run results:

Record count: 1

No log of 1027424.

Source:

{ Old file: tbs0053.pp }
{  shows a problem with open arrays                     OK 0.99.1 (FK) }

procedure abc(var a : array of char);

  begin
     // error: a:='asdf';
  end;

var
   c : array[0..10] of char;

begin
   abc(c);
   writeln(c);
   // error: writeln(a);
end.

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