[fpc-pascal] looks like a bug

[Peter Blackman]

On 20/10/2026 23:28, Sven Barth via fpc-pascal wrote:
> Peter Blackman via fpc-pascal <fpc-pascal at lists.freepascal.org <mailto:fpc-pascal at lists.freepascal.org>> schrieb am Di., 20. Okt. 2026, 23:51:
> 
>     On 19/10/2026 01:45, P Padil via fpc-pascal wrote:
>      > I set a small array and the program below is ok to go out of bounds.
>      >
>      > —
>      > program test;
>      >
>      > type
>      >     tarr = array of array of boolean;
>      >
>      > var
>      >    exa : tarr = ((false,false,true,true),(false,false,true,true),
>      >    (true,true,false,true), (true,true,true,false));
>      >
>      > begin
>      >    writeln(exa[0,0],', ',exa[4,4]);
>      >    writeln(low(exa),', ',high(exa));
>      >    writeln(low(exa[4]),', ',high(exa[4]));
>      > end.
>     As its a dynamic array, I would use SetLength on it,
>     before assigning to its elements.
> 
> 
> The array is already initialized with the initialization directly following its declaration. A SetLength() is not necessary in that case.
> 
> Regards,
> Sven
> 
> 
> _______________________________________________
> fpc-pascal maillist  -  fpc-pascal at lists.freepascal.org
> https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

OK, but its initialised to 4x4.
0..4 is 5 I think.

Cheers,
Peter