Test suite results for test file webtbs/tw3174.pp

Test run data :

Test file "webtbs/tw3174.pp" information:

t_id 1309
t_adddate 2004/07/01
t_result 0
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 939747.

Source:

{ Source provided for Free Pascal Bug Report 3174 }
{ Submitted by "C Western" on  2004-06-19 }
{ e-mail: mftq75@dsl.pipex.com }
program test;

procedure Mumble(s: PChar);
begin
  WriteLn(s^);
  if s^<>'A' then
    halt(1);
end;

begin
  Mumble('A');
end.

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