anchor.diff:    TLog.NewLog(ltInfo,ClassName,'TNode.Create '+NodeVersion);
     inherited;
     FDisabledsNewBlocksCount := 0;
  -  FLockNodeOperations := TPCCriticalSection.Create('TNode_LockNodeOperations');
  +  FLockMempool := TPCCriticalSection.Create('TNode_LockMempool');
     FOperationSequenceLock := TPCCriticalSection.Create('TNode_OperationSequenceLock');
     FBank := TPCBank.Create(Self);
     FBCBankNotify := TPCBankNotify.Create(Self);
     FBCBankNotify.Bank := FBank;
     FBCBankNotify.OnNewBlock := OnBankNewBlock;
     FNetServer := TNetServer.Create;
  -  FOperations := TPCOperationsComp.Create(Nil);
  -  FOperations.bank := FBank;
  +  FMemPoolOperationsComp := TPCOperationsComp.Create(Nil);
  +  FMemPoolOperationsComp.bank := FBank;
     FNotifyList := TList<TNodeNotifyEvents>.Create;
     {$IFDEF BufferOfFutureOperations}
     FBufferAuxWaitingOperations := TOperationsHashTree.Create;
  
positive.code:   TLog.NewLog(ltInfo,ClassName,'TNode.Destroy START');
    Try
      step := 'Deleting critical section';
      FreeAndNil(FLockNodeOperations);
      FreeAndNil(FOperationSequenceLock);
  
      step := 'Desactivating server';
  
negative.code:   initial_block, aux_block, aux_n_op : Cardinal;
    opHashValid, opHash_OLD : TRawBytes;
    md160 : TRawBytes;
    LLockedMempool : TPCOperationsComp;
  begin
    Result := invalid_params;
    // Decode OperationHash
  