Tests are still started after cancellation

I have a bunch of test suites created using testSequencedGroup. I run them using runTestsInAssemblyWithCancel and expect that after the cancellation token is cancelled all the pending groups don’t even start. But it is not what happens, all tests in the project are attempted. afterRunTests is executed immediately after I press Ctrl-C.

Here is an excerpt from my main function:

  [<EntryPoint>]
  let main argv =
    // ...
    use cts = new Threading.CancellationTokenSource()
    Console.CancelKeyPress.Add <| fun arg ->
      cts.Cancel()
      arg.Cancel <- true
    Tests.afterRunTests BrowserPool.cleanup
    Tests.runTestsInAssemblyWithCancel cts.Token testConfig argv

[jzabroski]

@haf My bad. I did not see the Console.CancelKeyPress.Add in the code. That’s what I get for waking up and reading code before coffee.

[jzabroski]

Handling control c requires different logic