Test suite results for test file webtbs/tw1412.pp

Test run data :

Test file "webtbs/tw1412.pp" information:

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

Detailed test run results:

Record count: 1

No log of 948213.

Source:

PROGRAM initializationBug( INPUT, OUTPUT );
{$H+}
CONST
  bufferSize = 8;
  tableSize = 2;

TYPE
  bufferRecord = RECORD
    stringBuffer     : String;
    characterBuffer  : ARRAY[ 1..bufferSize ] OF CHAR;
  END;

VAR
  bufferTable  : ARRAY[ 1..tableSize ] OF bufferRecord;

BEGIN
  WRITELN( '< INITIALIZATION BUG HAS NOT OCCURRED!' );
END.

Link to SVN view of webtbs/tw1412.pp source.