Test suite results for test file webtbs/tw3160a.pp

Test run data :

Test file "webtbs/tw3160a.pp" information:

t_id 1326
t_adddate 2004/08/09
t_result 207
t_knownrunerror 0

Detailed test run results:

Record count: 1

No log of 940737.

Source:

{ %RESULT=207 }
{ Source provided for Free Pascal Bug Report 3160 }
{ Submitted by "Michalis Kamburelis" on  2004-06-12 }
{ e-mail: michalis@camelot.homedns.org }
var A:Extended;
begin
 { All lines below will raise runtime error 207
   (Invalid floating point operation, converted to EInvalidOp exception)
   under Win32.

   But under Linux they raise runtime error 216
   (General protection fault, converted to EAccessViolation). }
 A:=0;   Writeln(0 / A);
 A:=-3;  Writeln(Ln(A));
 A:=-3;  Writeln(Sqrt(A));
end.

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