anchor.diff:  //    let clusterUpdateTimer = Timer( ClusterInfo.PeriodicClusterUpdate, 
   //                                        clusterStatus, Timeout.Infinite, Timeout.Infinite)
       let mutable expectedClusterSize = 0 
  -    let mutable queues = Array.zeroCreate<NetworkCommandQueue> 0
  +    let mutable queues : NetworkCommandQueue[] = null
       let mutable bFailedMsgShown = Array.create 0 false 
       // clock for communication 
       let clock = System.Diagnostics.Stopwatch.StartNew()
  
positive.code:         x.CommunicationInited.Force() |> ignore
  
      member internal x.QueueForWrite( peeri ) =
          try 
              let queue = ref x.Queues.[peeri]
              if Utils.IsNull !queue then
  
negative.code: 
      /// Start connection to all peers
      member internal x.ConnectAll() = 
          x.InitializeQueues()
          for peeri=0 to x.NumNodes-1 do
              x.QueueForWrite(peeri) |> ignore
  
      /// Disconnect all peers. 
      member internal x.DisconnectAll() = 
  