t_id
1113
t_adddate
2003/10/14
t_result
0
Flag
t_fail
set
t_knownrunerror
0
Record count: 50
Total = 50
OK=43 Percentage= 86.00
| Result type | Cat. | Count | Percentage | First date | Last Date |
| Failed to compile | 7 | 14.0 | 2024/09/26 19:31:00 339 | 2024/09/26 22:50:00 299 | |
| wasm32 | 7 | 100.0 | 2024/09/26 19:31:00 339 | 2024/09/26 22:50:00 299 | |
| wasi | 7 | 100.0 | 2024/09/26 19:31:00 339 | 2024/09/26 22:50:00 299 | |
| 3.3.1 | 7 | 100.0 | 2024/09/26 19:31:00 339 | 2024/09/26 22:50:00 299 | |
| Success, compilation failed | 43 | 86.0 | 2024/09/26 18:42:00 90 | 2024/09/26 23:02:00 44 | |
| i386 | 4 | 9.3 | 2024/09/26 19:54:00 70 | 2024/09/26 22:38:00 79 | |
| powerpc | 14 | 32.6 | 2024/09/26 19:41:00 35 | 2024/09/26 23:02:00 44 | |
| powerpc64 | 17 | 39.5 | 2024/09/26 18:42:00 90 | 2024/09/26 22:29:00 103 | |
| riscv64 | 8 | 18.6 | 2024/09/26 19:14:00 123 | 2024/09/26 19:59:00 123 | |
| linux | 39 | 90.7 | 2024/09/26 18:42:00 90 | 2024/09/26 23:02:00 44 | |
| go32v2 | 4 | 9.3 | 2024/09/26 19:54:00 70 | 2024/09/26 22:38:00 79 | |
| 3.3.1 | 27 | 62.8 | 2024/09/26 18:42:00 90 | 2024/09/26 22:38:00 79 | |
| 3.2.3 | 16 | 37.2 | 2024/09/26 21:17:00 71 | 2024/09/26 23:02:00 44 |
{ %FAIL }
{ Source provided for Free Pascal Bug Report 2053 }
{ Submitted by "Luis Castedo" on 2002-07-24 }
{ e-mail: castedo@elai.upm.es }
program tb2;
{$MODE TP}
{$C+}
type
TMyRecord = record
mr_sglDummy1: array[0..3] of Single;
mr_lDummy2 : Longint;
mr_iDummy3 : Integer;
mr_iDummy4 : Integer;
end;
{ TMyRecordArray = array[Integer] of TMyRecord;} { Error }
TMyRecordArray = array[Longint] of TMyRecord; { OK }
PMyRecordArray = ^TMyRecordArray;
var
pArray: PMyRecordArray;
begin
GetMem(pArray, 50 * SizeOf(TMyRecord));
Assert(Assigned(pArray));
WriteLn('pArray = ', Longint(pArray));
WriteLn('@(pArray^[0]) = ', Longint(@(pArray^[0])));
pArray^[0].mr_lDummy2 := 0;
FreeMem(pArray, 50 * SizeOf(TMyRecord));
end.
{
$Log: tw2053.pp,v $
Revision 1.4 2002/10/15 15:48:25 carl
- remove Pierre's diff.
Revision 1.3 2002/10/15 06:38:29 pierre
* really try to allocate more than 2Gb
Revision 1.2 2002/10/09 16:56:46 carl
* some cpu specific tests not run under other CPU's
Revision 1.1 2002/09/27 21:09:56 carl
+ new bug report
}