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
