anchor.diff:      procedure UnlockMempoolWrite;
       //
       Function AddNewBlockChain(SenderConnection : TNetConnection; NewBlockOperations: TPCOperationsComp; var newBlockAccount: TBlockAccount; var errors: String): Boolean;
  -    Function AddOperations(SenderConnection : TNetConnection; OperationsHashTree : TOperationsHashTree; OperationsResult : TOperationsResumeList; var errors: String): Integer;
  +    Function AddOperations(SenderConnection : TNetConnection; AOperationsHashTreeToAdd : TOperationsHashTree; OperationsResult : TOperationsResumeList; var errors: String): Integer;
       Function AddOperation(SenderConnection : TNetConnection; Operation : TPCOperation; var errors: String): Boolean;
       Function SendNodeMessage(Target : TNetConnection; const TheMessage : String; var errors : String) : Boolean;
       //
  
positive.code:   End;
  end;
  
  function TNode.AddOperations(SenderConnection : TNetConnection; OperationsHashTree : TOperationsHashTree; OperationsResult : TOperationsResumeList; var errors: String): Integer;
    {$IFDEF BufferOfFutureOperations}
    Procedure Process_BufferOfFutureOperations(ALockedMempool : TPCOperationsComp; valids_operations : TOperationsHashTree);
    Var i,j, nAdded, nDeleted : Integer;
  
negative.code:   FMemPoolOperationsComp := TPCOperationsComp.Create(Nil);
    FMemPoolOperationsComp.bank := FBank;
    FNotifyList := TList<TNodeNotifyEvents>.Create;
    FMemPoolAddingOperationsList := TOrderedRawList.Create;
    {$IFDEF BufferOfFutureOperations}
    FBufferAuxWaitingOperations := TOperationsHashTree.Create;
    {$ENDIF}
  