How to add delay to testSequenced?

[ibrahim324]

Let's say I was hitting a rate-limited API in my tests, how would i add a 5 (or n) second delay between each test execution? I used testSequenced <| testList ..., but would like to specify a delay.

[farlee2121]

The wonderful thing about expecto is how easy it is to extend.

I'd say your simplest route here is to create a light wrapper function. Then you can communicate with your naming what you intended and you have more granular control over which tests need to wait for the rate limit.

[<Tests>]
let tests =
  testList "samples" [
    testSequenced <| testList "Use wrapper for delay" [
      let testWaitForRateLimit name testf = 
        testCase name (fun () -> 
          System.Threading.Thread.Sleep(5000); 
          testf()
        )
      
      testCase "first one isn't delayed" <| fun () ->
        printfn "I'm not delayed"

      testWaitForRateLimit "Second one is delayed" <| fun () ->
        printfn "I'm delayed"
    ]

  ]

If you'd rather apply the rate limit to an entire collection, you can always wrap testList and map over the test list parameter to wrap them with a delay