Test suite results for test file webtbs/tw1917.pp

Test run data :

Run ID:
Operating system: win64
Processor: x86_64
Version: 3.3.1
Fails/OK/Total: 26/9446/9472
Version: 3.3.1
Full version: 3.3.1-15668-ge657d6a07d
Comment: -CX -XX -O3 -Fd
Machine: fpcWin7-64
Category: 1
SVN revisions: e60a7d01a4:41ae52dde1:e657d6a07d:6a109634b0
Submitter: pierre
Date: 2024/05/06 05:50:00 <> 2024/05/05
Previous run: 945551
Next run: 947547

Hide skipped tests

Hide successful tests

Test file "webtbs/tw1917.pp" information:

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

Detailed test run results:

tr_idruntr_oktr_skiptr_result
515349103946551TrueFalseSuccessfully run

Record count: 1

No log of 946551.

Source:

{$mode objfpc}

uses SysUtils;

var
  x,y,z : real;

begin
  x:=5.75;
  y:=5.75;
  z:=6;
  try
    z:=z/ln(x/y);
    WriteLn('Error! No runtime error detected');
    Writeln('z = ',z);
  except
     on e : exception do
       begin
         Writeln('Correct, found error: ',e.message);
       end;
  end;
end.

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