t_id
1535
t_adddate
2005/03/25
t_result
0
Flag
t_norun
set
t_knownrunerror
0
Record count: 50
Total = 50
OK=0 Percentage= 0.00
Skipped=50 Percentage= 100.00
| Result type | Cat. | Count | Percentage | First date | Last Date |
| Skipping run test | 50 | 100.0 | 2024/05/18 01:10:00 32 | 2024/05/18 02:02:00 35 | |
| i386 | 25 | 50.0 | 2024/05/18 01:10:00 32 | 2024/05/18 02:02:00 35 | |
| x86_64 | 22 | 44.0 | 2024/05/18 01:28:00 26 | 2024/05/18 02:01:00 0 | |
| aarch64 | 3 | 6.0 | 2024/05/18 01:29:00 34 | 2024/05/18 01:46:00 37 | |
| linux | 49 | 98.0 | 2024/05/18 01:10:00 32 | 2024/05/18 02:02:00 35 | |
| go32v2 | 1 | 2.0 | 2024/05/18 01:45:00 54 | 2024/05/18 01:45:00 54 | |
| 3.3.1 | 28 | 56.0 | 2024/05/18 01:29:00 34 | 2024/05/18 02:01:00 0 | |
| 3.2.3 | 22 | 44.0 | 2024/05/18 01:10:00 32 | 2024/05/18 02:02:00 35 |
{%NORUN}
{$MODE MACPAS}
{Tests of mac pascal constructs, concerning compile time constructs}
{** Test Compiler variables **}
{$SETC ADAM := TRUE}
{$IFC ADAM <> TRUE}
{$ERRORC Test failed}
{$ENDC}
{$SETC BERTIL := FALSE}
{$IFC BERTIL = FALSE}
{ OK }
{$ELSEC}
{$ERRORC Test failed}
{$ENDC}
{** Test Defined/Undefined **}
{$IFC UNDEFINED FPC_MACPAS}
{$ERRORC Test failed}
{$ENDC}
{$IFC NOT DEFINED FPC_MACPAS}
{$ERRORC Test failed}
{$ENDC}
{** Test Push/Pop **}
{$J-}
{$PUSH}
{$PUSH}
{$J+}
{$POP}
{$POP}
{$IFC OPTION(J)}
{$ERRORC $PUSH/$POP doesnt work properly}
{$ENDC}
program tmacpas4;
begin
end.