obj input value
Refs returns the internal Tcl reference count of obj. This operator is only for internal use.
set v [view A def {1 2 3}] view $v refs 5
5