Test suite results for test file webtbs/tw2975.pp

Test run data :

Test file "webtbs/tw2975.pp" information:

t_id 1265
t_adddate 2004/02/25
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 934949.

Source:

{ Source provided for Free Pascal Bug Report 2975 }
{ Submitted by "Michalis Kamburelis" on  2004-02-15 }
{ e-mail: michalis@camelot.homedns.org }
procedure p;
const
  t:array[0..0]of AnsiString = ('blah');
begin
 Writeln('''', t[0], '''');
  if t[0]='' then
    halt(1);
end;

begin
 p;
 p;
end.

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