anchor.diff:                      do! Async.Sleep 100
                       do! send record (attempts + 1)
                   | Flatten exn ->
  -                    errorEvent.Trigger(exn)
  +                    errorEvent.Trigger(record, exn)
                       logger.Warn(sprintf "PutRecord request attempt [%d] encountered an error, retrying..." attempts, exn)
   
                       do! send record (attempts + 1)
  
positive.code:             decrBacklog()
              virman.TrackSuccessfulSend(shardId, payloadSize))
          trooper.OnThrottled.Add(virman.TrackThrottledSend)
  
          trooper
  
  
negative.code:     let logger     = LogManager.GetLogger loggerName
      
      let successEvent   = new Event<string * int>()
      let errorEvent     = new Event<Record * Exception>()
      let failedEvent    = new Event<Record>()
      let throttledEvent = new Event<string>()
      
  