[fpc-devel] user error or bug? bitpacked array - neighbouring values overwrite each other

[Martin Frb]

On 09/10/2019 12:09, Martin wrote:
> program test;
> type
>   TTinyNegRange = -2..3;
>   TBitPackTinyNegArray  = bitpacked array [0..3] of TTinyNegRange;
>   TTestArray  = bitpacked array [0..3] of byte;
> const
>   // No Error / WRONG Value, prints: 2, -2, -1, -1  // 0 is replaced 
> by -1
>   gcBitPackTinyNegArray : TBitPackTinyNegArray = (2, cardinal(-2), 0, 
> cardinal(-1));

possible related https://bugs.freepascal.org/view.php?id=36156