dynamic array
Original Reporter info from Mantis: FPCCore
-
Reporter name: FPC core team
Original Reporter info from Mantis: FPCCore
- Reporter name: FPC core team
Description:
fp 1.9.4 dos/win32
var a,b:array of integer;
i :integer;
begin
setlength(a,3);
a[0]:=1;
a[1]:=2;
a[2]:=3;
b:=a;
writeln('len b= ',length(b)); // output is 3: OK
setlength(a,0);
writeln('len a= ',length(a)); // output is 0: OK
for i:=1 to length(b) do writeln(b[i-1]); // output is 1: BAD
writeln('len b= ',length(b)); // output is 1: BAD, must be 0
readln;
end.
Additional information:
Reporter: Salvatore Licciardi
EMail: turylicciardi at tiscali dot it
Mantis conversion info:
- Mantis ID: 5318
- OS: GO32V2
- Version: 1.9.4
- Fixed in version: 1.9.5