t_id
1468
t_adddate
2005/01/26
t_result
0
t_knownrunerror
0
Record count: 50
Total = 50
OK=50 Percentage= 100.00
| Result type | Cat. | Count | Percentage | First date | Last Date |
| Successfully run | 50 | 100.0 | 2024/05/20 23:37:00 42 | 2024/05/21 01:32:00 0 | |
| i386 | 34 | 68.0 | 2024/05/21 00:08:00 23 | 2024/05/21 01:32:00 28 | |
| sparc | 3 | 6.0 | 2024/05/20 23:37:00 42 | 2024/05/20 23:55:00 41 | |
| x86_64 | 8 | 16.0 | 2024/05/21 00:16:00 14 | 2024/05/21 01:32:00 0 | |
| powerpc64 | 2 | 4.0 | 2024/05/21 01:10:00 101 | 2024/05/21 01:11:00 108 | |
| aarch64 | 3 | 6.0 | 2024/05/21 00:12:00 32 | 2024/05/21 01:29:00 35 | |
| linux | 47 | 94.0 | 2024/05/21 00:08:00 23 | 2024/05/21 01:32:00 0 | |
| solaris | 3 | 6.0 | 2024/05/20 23:37:00 42 | 2024/05/20 23:55:00 41 | |
| 3.3.1 | 28 | 56.0 | 2024/05/20 23:37:00 42 | 2024/05/21 01:32:00 28 | |
| 3.2.3 | 22 | 44.0 | 2024/05/20 23:47:00 40 | 2024/05/21 01:32:00 0 |
{ Source provided for Free Pascal Bug Report 3534 }
{ Submitted by "Mattias Gaertner" on 2005-01-08 }
{ e-mail: mattias@freepascal.org }
program IntToStrSmallIntBug;
{$mode objfpc}{$H+}
uses
SysUtils;
var
i: SmallInt;
begin
i:=-3;
writeln(IntToStr(i));
if IntToStr(i)<>'-3' then
halt(1);
end.