Test suite results for test file webtbs/tw0935.pp

Test run data :

Test file "webtbs/tw0935.pp" information:

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

Detailed test run results:

Record count: 1

No log of 1015618.

Source:

{$inline on}

procedure test(v:boolean);

 procedure notice(s:string);inline;
 begin
 writeln(s);
 end;

begin
if v then notice('this string vanishes.');
writeln('"test" main body executed.');
end;



begin
writeln('testing with True...');
test(true);
writeln;
writeln('testing with False...');
test(false);
end.

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