Test suite results for test file tbs/tb0052.pp

Test run data :

Run ID:
Operating system: win32
Processor: i386
Version: 3.3.1
Fails/OK/Total: 21/9687/9708
Version: 3.3.1
Full version: 3.3.1-15676-g9b1861a104
Comment: -Fd
Machine: fpcWin7-64
Category: 1
SVN revisions: 9b1861a104:d6cf3c98d0:e657d6a07d:485b31de21
Submitter: pierre
Date: 2024/05/08 13:01:00 <> 2024/05/07
Previous run: 947361
Next run: 948866

Hide skipped tests

Hide successful tests

Test file "tbs/tb0052.pp" information:

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

Detailed test run results:

tr_idruntr_oktr_skiptr_result
525453741948187TrueFalseSuccessfully run

Record count: 1

No log of 948187.

Source:

{ Old file: tbs0058.pp }
{  causes an internal error 10 (problem with getregisterOK 0.99.1 (FK) }

{$r+}
var
   a1 : array[0..1,0..1] of word;
   a2 : array[0..1,0..1] of longint;
   i,j,l,n : longint;

begin
   a1[i,j]:=a2[l,n];
end.

Link to SVN view of tbs/tb0052.pp source.