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 _______________________________________________ fpc-pascal maillist - [email protected] https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal
