Преглед изворни кода

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