Преглед на файлове

Memory leak fix on PCAbstractMem object

Pascal Coin преди 4 години
родител
ревизия
98c367fca2
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  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