t_id
558
t_adddate
2003/10/03
t_result
0
t_knownrunerror
0
tr_id | run | tr_ok | tr_skip | tr_result |
---|---|---|---|---|
949660390 | 1015615 | True | False | Successfully run |
Record count: 1
{$mode TP} uses ub0339; type r = packed record Foo : Boolean; Bar : (No, Yes); Baz : 0 .. 3; Qux : -1 .. 0; Fred : 1 .. 7 end; begin Writeln ('AAA: Size of packed record r = ', SizeOf (r), ' bytes.'); Writeln ('AAA: Size of packed record r2 = ', SizeOf (r2), ' bytes.'); PrintSize; end.