anchor.diff:  open System.Threading.Tasks
   open Basis.Core
   
  -module TestAssemblyModule =
  +module private OneshotTestAssemblyCore =
     let loadSchema (assemblyName: AssemblyName) () =
       Result.catch (fun () -> Assembly.Load(assemblyName))
       |> Result.map TestSuiteSchema.ofAssembly
  
positive.code: 
    let testSuiteSchema =
      let result = 
        domain.Value |> AppDomain.run (TestAssemblyModule.loadSchema assemblyName)
      match result with
      | Success schema ->
        schema
  
negative.code:   let start () =
      let (result, connectable) =
        domain.Value
        |> AppDomain.runObservable (OneshotTestAssemblyCore.load assemblyName)
      match result with
      | Some ()->
        connectable.Subscribe(resultObserver) |> resource.Add
  