anchor.diff:              verbosity = Logging.LogLevel.Fatal }
         Expect.equal (runTests config neverEndingTest) 8 "timeout"
       }
  -
  -    yield testCaseAsync "deadlock sequenced" <| async {
  +    // This test needs to run sequenced to ensure there are enough threads free to test no deadlock
  +    yield testSequenced (testCaseAsync "deadlock sequenced" <| async {
         let config =
           { defaultConfig with
               ``parallel`` = false
  -            stress = TimeSpan.FromMilliseconds 10000.0 |> Some
  +            stress = TimeSpan.FromMilliseconds 20000.0 |> Some
               stressTimeout = TimeSpan.FromMilliseconds 10000.0
               printer = TestPrinters.silent
               verbosity = Logging.LogLevel.Fatal }
         Expect.equal (runTests config (deadlockTest())) 0 "no deadlock"
  -    }
  +    })
     ]
  
positive.code:             verbosity = Logging.LogLevel.Fatal }
        Expect.equal (runTests config neverEndingTest) 8 "timeout"
      }
  
      yield testCaseAsync "deadlock" <| async {
        let config =
          { defaultConfig with
              parallelWorkers = 8
              stress = TimeSpan.FromMilliseconds 10000.0 |> Some
              stressTimeout = TimeSpan.FromMilliseconds 10000.0
              printer = TestPrinters.silent
              verbosity = Logging.LogLevel.Fatal }
        Expect.equal (runTests config (deadlockTest())) 8 "timeout"
      }
  
      yield testCaseAsync "sequenced group" <| async {
        let config =
  
negative.code:           ) ()
          }
        ]
  
      let sequencedGroup() =
        testList "with other" [
          singleTest
  