anchor.diff:        }
       loop ())
   
  -let newManager () : actor<Manager> =
  +let newManager maxDOP : actor<Manager> =
     let sw = System.Diagnostics.Stopwatch.StartNew()
     actor.Start(fun self ->
       let rec loop workers maxWorkers doneWorkers =
  
positive.code:       }
      loop [] 0 0)
  
  let run () =
    // suites list is in reverse order and have to be reversed before running the tests
    suites <- List.rev suites
    let manager = newManager()
    manager.Post(Manager.Initialize(suites))
    manager.Post(Manager.Start)
  
  
negative.code: let ( &&! ) description _ =
      (last suites).Tests <- Test(description, skipped, ng())::(last suites).Tests
  
  let private runtest (test : Test) =
    reporter.Post(Reporter.TestStart(test.Description, test.Id))
    if System.Object.ReferenceEquals(test.Func, todo) then
  