anchor.diff:              )
   
           let! parallelResults =
  -          let noWorkers = numberOfWorkers false config
  +          let noWorkers = numWorkers false config
             if List.length parallel <= noWorkers then
               Async.Parallel parallel
               |> Async.map (Seq.concat >> Seq.toList)
             else
  -            Async.foldParallelLimit noWorkers (@) [] parallel
  +            Async.foldParallel noWorkers (@) [] parallel
   
           if List.isEmpty sequenced |> not && List.isEmpty parallel |> not then
             do! config.printer.info "Starting sequenced tests..."
  
positive.code:           else
              false )
          >> Seq.map evalTestAsync
          >> foldRunner cancel folder (runningTests,results,maxMemory)
  
        let initial = ResizeArray(), ResizeMap(), GC.GetTotalMemory false
  
  
negative.code:                       s=InParallel ||
                        not(Seq.exists (fun t -> t.sequenced=s) runningTests)
                      )
                   |> asyncRun
                        (Async.foldParallelWithCancel (numWorkers true config))
                        (runningTests,results,maxMemory)
               )
  
        w.Stop()
  