anchor.diff:  module oxen.Tests
   
   open System
  +open System.IO
   open oxen
   open Foq
   open StackExchange.Redis
  
positive.code:                 d.ListLeftPushAsync(any(), any(), any(), any()) --> taskLPush()
              @>
          )
          let sub = Mock<ISubscriber>().Create();
  
          let queue = Queue<Data>("stuff", (fun () -> db), (fun () -> sub))
  
          // When
          let job = queue.add ({value = "test"}) |> Async.RunSynchronously
      
  
negative.code:         verify <@ db.HashSetAsync(any(), any()) @> once
          verify <@ db.StringIncrementAsync(any()) @> once
          verify <@ db.ListLeftPushAsync(any(), any(), any(), any()) @> once
          
      [<Fact>]
      let ``toKey should return a key that works with bull`` () = 
          // Given
  