Explorar o código

Memory leak fix on PCAbstractMem object

Pascal Coin %!s(int64=4) %!d(string=hai) anos
pai
achega
98c367fca2
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      src/core/UPCAbstractMem.pas

+ 1 - 0
src/core/UPCAbstractMem.pas

@@ -545,6 +545,7 @@ begin
   FreeAndNil(FBufferBlocksHash);
   FreeAndNil(FAggregatedHashrate);
   FreeAndNil(FAccountsOrderedByUpdatedBlock);
+  FreeAndNil(FAccountsOrderedBySalePrice);
   if (FFileName<>'') And (FAbstractMem is TMem) And (Not FAbstractMem.ReadOnly) then begin
     LFile := TFileStream.Create(FFileName,fmCreate);
     try