Usage example for heaptrc in the rtl documentation is wrong
Original Reporter info from Mantis: Thaddy
-
Reporter name: Thaddy de Koning
Original Reporter info from Mantis: Thaddy
- Reporter name: Thaddy de Koning
Description:
Usage example for heaptrc in the rtl documentation is wrong.
It explicitly uses heaptrc in the uses clause and this is no longer allowed.
Maybe replace "uses heaptrc" with "{ compile this example with -gh or -glh }"
Steps to reproduce:
Program heapex;
{ Program used to demonstrate the usage of heaptrc unit }
Uses heaptrc; // <=== replace with something like {compile this example with -gh}
Var P1 : ^Longint;
P2 : Pointer;
I : longint;
begin
New(P1);
// causes previous allocation not to be de-allocated
New(P1);
Dispose(P1);
For I:=1 to 10 do
begin
GetMem (P2,128);
// When I is even, deallocate block. We loose 5 times 128
// bytes this way.
If (I mod 2) = 0 Then FreeMem(P2,128);
end;
GetMem(P2,128);
// This will provoke an error and a memory dump
Freemem (P2,64);
end.
Mantis conversion info:
- Mantis ID: 31480
- OS: All
- OS Build: All
- Build: 35522
- Platform: All
- Version: 3.1.1
- Fixed in version: 3.1.1
- Fixed in revision: 1403 (#276f35e3)
- Target version: 3.2.0