anchor.diff:      }
   
       /// Gets a printed report of all currently executing processes
  -    member pm.FormatProcesses() : string =
  -        let procs = pm.GetAllProcesses() |> Async.RunSync
  -        CloudProcessReporter.Report(procs, "Processes", borders = false)
  +    member pm.FormatProcessesAsync() : Async<string> = async {
  +        let! entries = runtime.ProcessManager.GetAllProcesses()
  +        let! data = entries |> Seq.map CloudProcessData.OfCloudProcessEntry |> Async.Parallel
  +        return CloudProcessReporter.Report(data, "Processes", borders = false)
  +    }
  +
  +    /// Gets a printed report of all currently executing processes
  +    member pm.FormatProcesses() : string = pm.FormatProcessesAsync() |> Async.RunSync
   
       /// Prints a report of all currently executing processes to stdout.
       member pm.ShowProcesses() : unit =
  
positive.code:     [<DebuggerBrowsable(DebuggerBrowsableState.Never)>]
      override __.ResultBoxed = __.Result |> box
  
      override __.StartTime =
          match cell.Value.ExecutionTime with
          | NotStarted -> None
          | Started(st,_) -> Some (st.ToLocalTime())
          | Finished(st,_) -> Some (st.ToLocalTime())
  
      override __.ExecutionTime =
          match cell.Value.ExecutionTime with
          | NotStarted -> None
          | Started(_,et) -> Some et
          | Finished(_,et) -> Some et
  
      override __.CompletionTime =
          match cell.Value.ExecutionTime with
          | Finished(st,et) -> Some (st.ToLocalTime() + et)
          | _ -> None
  
      override __.CancellationToken = entry.Info.CancellationTokenSource.Token
      /// Active number of work items related to the process.
      override __.ActiveWorkItems = cell.Value.ActiveWorkItemCount
      override __.CompletedWorkItems = cell.Value.CompletedWorkItemCount
      override __.FaultedWorkItems = cell.Value.FaultedWorkItemCount
      override __.TotalWorkItems = cell.Value.TotalWorkItemCount
      override __.Status = cell.Value.Status
      override __.Id = entry.Id
      override __.Name = entry.Info.Name
      override __.Type = typeof<'T>
  
negative.code:         member x.TryGetResultBoxed(): Async<obj option> = x.TryGetResultBoxed()
  
      /// Gets a printed report on the current process status
      abstract GetInfo : unit -> string 
  
      /// Prints a report on the current process status to stdout
      member p.ShowInfo () : unit = Console.WriteLine(p.GetInfo())
  