anchor.diff:      }
       static member private logger = LogManager.getLogger()
       member private this._logger = Job<'a>.logger
  +    /// returns the redis key for the lock for this job
       member this.lockKey () = this.queue.toKey((this.jobId.ToString ()) + ":lock")
  +    /// retuns a HashEntry [] containing the data as it's stored in redis
       member this.toData () =
           this._logger.Info "creating redis hash for job %i" this.jobId  
           let jsData = JsonConvert.SerializeObject (this.data)
  
positive.code:             return [| waitLength.Result; pausedLength.Result; |] |> Seq.max
          }
      
      member x.empty () = 
          async { 
              logger.Info "emptying queue %s" name
  
negative.code:                 do! this.emitQueueEvent Paused 
                  return paused
          }
        
      /// resume a paused queue  
      member x.resume handler = 
          async { 
              logger.Info "resuming queue %s" name
  