Hi all,

There is a bug in the heaptrc unit (1.0 and 1.1).
ReAllocMem(p,0) does not set p to nil.

function TraceReAllocMem(var p:pointer;size:longint):Pointer;
var
  [...]
begin
{ Free block? }
  if size=0 then
   begin
     if pnil then
      TraceFreeMem(p);
     P:=nil; // something like this is missing
     TraceReallocMem:=P;
     exit;
   end;

Mattias Gaertner

you wrote

Hi all, There is a bug in the heaptrc unit (1.0 and 1.1). ReAllocMem(p,0) does not set p to nil.

Thanks for reporting, it's now fixed in both branches.

Peter