anchor.diff:                  do! Async.AwaitTask(t)
                   return true
               }
  -        let result =Async.RunSynchronously(a, 1000)
  +        let result =Async.RunSynchronously(a)
           (!hasBeenCalled && result) |> Assert.True
   
       [<Fact>]
  
positive.code:                 let! s1 = Async.AwaitTask(t)
                  return s = s1
              }
          Async.RunSynchronously(a, 1000) |> Assert.True
  
      [<Fact>]
      member this.AwaitTaskCancellation () =
  
negative.code:             let! result = tcs.Task |> Async.AwaitTask
              return result }
  
          let cancelled =
              try
                  Async.RunSynchronously(a, cancellationToken = cts.Token) |> ignore
                  false
              with :? OperationCanceledException as o -> true
                   | _ -> false
  
          Assert.True (cancelled, "Task is not cancelled")
  
      [<Fact>]
      member this.ExceptionPropagatesToTask () =
  