anchor.diff:      testSuiteSchema
   
     override this.TestCompleted =
  -    testResults :> IObservable<_>
  +    testCompleted :> IObservable<_>
   
     override this.Start() =
       start ()
  
positive.code: 
    do resource.Add(domain)
  
    let testResults =
      new Subject<TestResult>()
  
    do
      Disposable.Create
        (fun () ->
          testResults.OnCompleted()
          testResults.Dispose()
        )
      |> resource.Add
  
  
negative.code:   let resultObserver =
      { new IObserver<TestResult> with
          override this.OnNext(value) =
            testCompleted.OnNext(value)
          override this.OnError(e) =
            isTerminated <- true
          override this.OnCompleted() =
  