Test suite results for test file webtbf/tw3553.pp

Test run data :

Test file "webtbf/tw3553.pp" information:

t_id 1451
t_adddate 2005/01/17
t_result 0
Flag t_fail set
t_knownrunerror 0
t_opts -Sew

Detailed test run results:

Record count: 1

No log of 1027364.

Source:

{ %fail }
{ %opt=-Sew }

{ Source provided for Free Pascal Bug Report 3553 }
{ Submitted by "Naj Kejah" on  2005-01-15 }
{ e-mail: universario@hotmail.com }

var K : integer;

BEGIN
  while FALSE do
    K:=2;{ NO warning "unreachable code" from User.txt  }

  if FALSE then
    K:=2
  else
    K:=3;

  if TRUE then
    K:=2
  else
    K:=3;
END.

Link to SVN view of webtbf/tw3553.pp source.