anchor.diff:        }
       loop 0 0 0 0)
   
  +(*
  +   Value
  +   We only need one reporter.
  +*)
   let reporter = newReporter()
   
  +(*
  +   Private Function
  +   The logic to run a test is big enough to extract out of the
  +   worker actor and into a private helper function.
  +*)
   let private runtest (test : Test) =
     reporter.Post(Reporter.TestStart(test.Description, test.Id))
     if System.Object.ReferenceEquals(test.Func, todo) then
  
positive.code:       }
      loop [] [] None)
  
  let run maxDOP =
    let manager = newManager maxDOP
    manager.Post(Manager.Initialize(suites))
  
negative.code:             else
                return! loop wipWorkers pendingWorkers replyChannel
          | Manager.Start(replyChannel) ->
              self.Post(Manager.Run maxDOP)
              return! loop workers pendingWorkers (Some replyChannel)
          | Manager.Run(count) ->
  