[fpc-pascal] looks like a bug

[P Padil]

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.
—
Free Pascal Compiler version 3.2.2 [2024/09/11] for aarch64
Copyright (c) 1993-2021 by Florian Klaempfl and others
Target OS: Darwin for AArch64
Compiling test.pp
Assembling test
Linking test
-macosx_version_min has been renamed to -macos_version_min
ld: warning: -multiply_defined is obsolete
15 lines compiled, 0.3 sec
FALSE, TRUE
0, 3
0, 3

Regards
Pete