Test suite results for test file webtbs/tw3340.pp

Test run data :

Test file "webtbs/tw3340.pp" information:

t_id 1388
t_adddate 2004/11/01
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 940837.

Source:

{ Source provided for Free Pascal Bug Report 3340 }
{ Submitted by "Alexey Barkovoy" on  2004-10-05 }
{ e-mail: clootie@ixbt.com }
program Project1;
{$APPTYPE CONSOLE}
{$MODE DELPHI}
{$INLINE ON}
uses
  uw3340;

var
  t: TTT;
begin
  t:= TTT.Create;
  t.zz:= 9;
  WriteLn(t.Yes);
  t.Free;
end.

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