Test suite results for test file webtbs/tw3523.pp

Test run data :

Free Pascal Compiler Test Suite Results

View Test suite results

Please specify search criteria:
File:
Operating system:
Processor:
Version
Date
Submitter
Machine
Comment
Limit
Cond
Category
Only failed tests
Hide skipped tests
List all tests

Test file "webtbs/tw3523.pp" information:

t_id 1443
t_adddate 2005/01/08
t_result 0
t_knownrunerror 0

Detailed test run results:

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/21 00:50:00 26 2024/05/21 01:39:00 26
i386 39 78.0 2024/05/21 00:50:00 26 2024/05/21 01:39:00 26
x86_64 9 18.0 2024/05/21 01:21:00 14 2024/05/21 01:38:00 27
powerpc64 1 2.0 2024/05/21 01:11:00 108 2024/05/21 01:11:00 108
aarch64 1 2.0 2024/05/21 01:29:00 35 2024/05/21 01:29:00 35
linux 50 100.0 2024/05/21 00:50:00 26 2024/05/21 01:39:00 26
3.3.1 27 54.0 2024/05/21 01:09:00 28 2024/05/21 01:38:00 28
3.2.3 23 46.0 2024/05/21 00:50:00 26 2024/05/21 01:39:00 26

Source: 

procedure ttt(i1:integer;s1:string[255];b1:byte;i2:integer; 
  i3:integer;i4:integer;c1:char;s2,s3,s4,s5:string[255]);

begin
     if (i1 <> 1) or
        (s1 <> 'test1') or
        (b1 <> 1) or
        (i2 <> 2) or
        (i3 <> 3) or
        (i4 <> 4) or
        (c1 <> 'A') or
        (s2 <> 'test2') or
        (s3 <> 'test3') or
        (s4 <> 'test4') or
        (s5 <> 'test5') then
      halt(1);
end;

begin     
ttt(1,'test1',1,2,3,4,'A','test2','test3','test4','test5');
end.

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