[fpc-devel] Bitpacked Record Bug

[Willibald Krenn]

Am 23.10.2010 14:47, schrieb Willibald Krenn:

BTW: Changing is_packed_record to

> in nutils.pas (~ 1155)
> subscriptn:
> result:= is_packed_record_or_object(tsubscriptnode(n).left.resultdef)
> and (
> (tsubscriptnode(n).vs.vardef.packedbitsize mod 8 <> 0) or
> (tsubscriptnode(n).vs.fieldoffset mod 8 <>0));

(tsubscriptnode(n).vs.fieldoffset mod 8 <> 0) or
(tsubscriptnode(n).vs.vardef.packedbitsize mod 24 = 0));

seems to fix the problem on x64.

Willi