t_id
374
t_adddate
2003/10/03
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/21 01:54:00 35 | 2024/05/21 02:30:00 23 | |
| i386 | 14 | 28.0 | 2024/05/21 01:55:00 26 | 2024/05/21 02:26:00 23 | |
| x86_64 | 34 | 68.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:30:00 23 | |
| aarch64 | 2 | 4.0 | 2024/05/21 02:03:00 35 | 2024/05/21 02:19:00 42 | |
| linux | 49 | 98.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:30:00 23 | |
| win32 | 1 | 2.0 | 2024/05/21 02:04:00 34 | 2024/05/21 02:04:00 34 | |
| 3.3.1 | 27 | 54.0 | 2024/05/21 01:56:00 16 | 2024/05/21 02:30:00 23 | |
| 3.2.3 | 23 | 46.0 | 2024/05/21 01:54:00 35 | 2024/05/21 02:28:00 35 |
{ Old file: tbs0152.pp }
{ End value of loop variable must be calculated before loop variable is initialized. OK 0.99.11 (PM) }
Program tbs0152;
{
Shows wrong evaluation of loop boundaries. First end boundary must
be calculated, only then Loop variable should be initialized.
Change loop variable to J to see what should be the correct output.
}
PROCEDURE LGrow(VAR S : String;C:CHAR;Count:WORD);
VAR I,J :WORD;
BEGIN
I:=ORD(S[0]); { Keeping length in local data eases optimalisations}
IF I'1111111abcedfghij' then
begin
writeln('tbs0152 fails');
halt(1);
end;
end.