anchor.diff:      let mergedPackets = ResizeArray ()
   
       override this.Send (bytes, startIndex, size) =
  -        dataMerger.Send (bytes, startIndex, size)
  +        dataMerger.Enqueue (bytes, startIndex, size)
   
       override this.Update time =
  -        dataMerger.Update mergedPackets
  +        dataMerger.Flush mergedPackets
   
           let packets = mergedPackets
           for i = 0 to packets.Count - 1 do
  
positive.code: 
      let data = ResizeArray ()
  
      member this.Send (bytes, startIndex, size) =
          data.Add (struct (bytes, startIndex, size))
  
      member this.Update mergedPackets =
          for i = 0 to data.Count - 1 do
              let struct (bytes, startIndex, size) = data.[i]
              packetPool.GetFromBytes (bytes, startIndex, size, mergedPackets)
          data.Clear ()
  
  [<AbstractClass>]
  
negative.code:     let mergedPackets = ResizeArray ()
  
      override this.Send (bytes, startIndex, size) =
          dataMerger.Enqueue (bytes, startIndex, size)
  
      override this.Update time =
          dataMerger.Flush mergedPackets
  
          let packets = mergedPackets
          for i = 0 to packets.Count - 1 do
  