anchor.diff:  
     /// Runs tests with the supplied config.
     /// Returns 0 if all tests passed, otherwise 1
  -  let runTests config (tests:Test) =
  +  let runTestsWithCancel (ct:CancellationToken) config (tests:Test) =
       Global.initialiseIfDefault
         { Global.defaultConfig with
             getLogger = fun name -> LiterateConsoleTarget(name, config.verbosity, consoleSemaphore = Global.semaphore()) :> Logger }
  
positive.code: 
        return testSummary.errorCode
      }
  
    let testFromMember (mi: MemberInfo) : Test option =
      let inline unboxTest v =
  
negative.code:         }, cancel.Token)
  
          Seq.takeWhile (fun test ->
            if Stopwatch.GetTimestamp() < finishTimestamp.Value
                && not ct.IsCancellationRequested then
              runningTests.Add test
              true
            else
  