anchor.diff:      // NB: There is no single imaginable reason not to have it true by default!
       // Uncontended performance is close to non-synced.
       this.isSynchronized <- true
  -    this.constructorThread <- Thread.CurrentThread.ManagedThreadId
   
       let tempCap = if capacity.IsSome && capacity.Value > 0 then capacity.Value else 2
       if dictionary.IsNone || dictionary.Value.Count = 0 then // otherwise we will set them in dict processing part
  
positive.code:                   if x.MoveNext() then tcs.SetResult(true)
                    elif not this.IsMutable then tcs.SetResult(false)
                    else completeTcs(tcs, token)
                  | _ -> failwith "TODO process all task results"
                  ()
                )
            match x.MoveNext() with
  
negative.code:           readLockIf &this.nextOrderVersion &this.orderVersion this.isSynchronized (fun _ ->
              if this.size > 0 then
                index <- 0
                currentKey <- this.GetKeyByIndexUnchecked(index)
                currentValue <- this.values.[index]
                true
              else
  