Test suite results for test file webtbs/tw1867.pp

Test run data :

Test file "webtbs/tw1867.pp" information:

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

Detailed test run results:

Record count: 1

No log of 940467.

Source:

uses SysUtils;

var
  s : string;
begin
  s:=formatdatetime ('hh:nn:ss.zzz', encodetime (12, 30, 44, 4));
  writeln(s);
  if s<>'12:30:44.004' then
   begin
     writeln('ERROR!');
     halt(1);
   end;
end.

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