t_id
721
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
1022399384 | 1027328 | True | False | Successfully run |
Record count: 1
PROGRAM TEST; TYPE byteSet = SET OF 0..7; booleanArray = ARRAY[0..HIGH(word) DIV 8] OF byteSet; booleanArrayPointer = ^booleanArray; PROCEDURE SetBooleanArray( CONST p : booleanArrayPointer; CONST index : word ); BEGIN INCLUDE(p^[index DIV 8],index MOD 8) END; BEGIN END.