anchor.diff:  
   /// MBrace.Thespian client object used to manage cluster and submit work items for computation.
   [<AutoSerializable(false)>]
  -type ThespianCluster private (state : ClusterState, manager : IRuntimeManager, defaultFaultPolicy : FaultPolicy) =
  -    inherit MBraceClient(manager, defaultFaultPolicy)
  +type ThespianCluster private (state : ClusterState, manager : IRuntimeManager, defaultFaultPolicy : FaultPolicy option) =
  +    inherit MBraceClient(manager, defaultArg defaultFaultPolicy FaultPolicy.NoRetry)
   
       static do Config.Initialize(isClient = true, populateDirs = true)
       static let initWorkers logLevel (count : int) (target : ClusterState) = async {
  
positive.code:     /// <param name="logLevel">Sets the log level for the client instance. Defaults to LogLevel.Info.</param>
      /// <param name="faultPolicy">The default fault policy to be used by the cluster. Defaults to NoRetry.</param>
      static member Connect(worker : ThespianWorker, ?logLevel : LogLevel, ?faultPolicy : FaultPolicy) : ThespianCluster =
          let faultPolicy = match faultPolicy with Some f -> f | None -> getDefaultFaultPolicy()
          match worker.RuntimeState with
          | None -> invalidOp "Worker '%s' is not part of an active cluster." worker.Uri
          | Some state -> new ThespianCluster(state, logLevel, faultPolicy)
  
negative.code:                                     ?miscResources : ResourceRegistry, ?logLevel : LogLevel) : ThespianCluster =
  
          let fileStore = match fileStore with Some c -> c | None -> getDefaultStore ()
          let state = target.InitAsClusterMasterNode(fileStore, ?miscResources = miscResources) |> Async.RunSync
          new ThespianCluster(state, logLevel, faultPolicy)
  
  