浏览代码

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