anchor.diff:  
       {$IFDEF USE_HASH}
       // Cache of bid costs between 2 points
  -    fBidsCache: TKMDeliveryCache;
  +    fBidsCache: TKMDeliveryCache; //cache
  +    fRemoveKeysList: TList<TKMDeliveryBidKey>; //list of items to remove from cache. Create / Destroy it only once
       {$ENDIF}
   
       fNodeList: TKMPointList; // Used to calc delivery bid
  
positive.code: begin
    {$IFDEF USE_HASH}
    if CACHE_DELIVERY_BIDS then
      FreeAndNil(fBidsCache);
    {$ENDIF}
  
    if DELIVERY_BID_CALC_USE_PATHFINDING then
  
negative.code: 
        for key in cacheKeyArray do
        begin
          SaveStream.Write(key.FromP);
          SaveStream.Write(key.ToP);
          bid := fBidsCache[key];
          SaveStream.Write(bid.Value);
          SaveStream.Write(bid.TimeToLive);
        end;
      end;
  
  