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: 
          if workerCount < 0 then invalidArg "workerCount" "must be non-negative."
          let hostClusterStateOnCurrentProcess = defaultArg hostClusterStateOnCurrentProcess true
          let faultPolicy = match faultPolicy with Some f -> f | None -> getDefaultFaultPolicy()
          let fileStore = match fileStore with Some c -> c | None -> getDefaultStore ()
          let state =
              if hostClusterStateOnCurrentProcess then
  
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)
  
  