|
@@ -23,10 +23,10 @@ begin
|
|
begin
|
|
begin
|
|
GetMem(MemArray[i],Size(i));
|
|
GetMem(MemArray[i],Size(i));
|
|
end;
|
|
end;
|
|
- for i:=1 to MAX_SIZE div SIZE_INC do
|
|
|
|
|
|
+ for i:=0 to MAX_SIZE div SIZE_INC do
|
|
begin
|
|
begin
|
|
FreeMem(MemArray[i],Size(i));
|
|
FreeMem(MemArray[i],Size(i));
|
|
end;
|
|
end;
|
|
- Writeln(stderr,'Everthing is fine');
|
|
|
|
|
|
+ Writeln(stderr,'Everything is fine');
|
|
|
|
|
|
end.
|
|
end.
|