Posted to tcl by aspect at Sat Jan 11 02:30:19 GMT 2020view raw

  1. [8.7a2]% set var1 value
  2. value
  3. [8.7a2]% set var2 $var1
  4. value
  5. [8.7a2]% ::tcl::unsupported::representation $var1
  6. {value is a pure string with a refcount of 7, object pointer at 0x11ccf88, string representation "value"}
  7. [8.7a2]% ::tcl::unsupported::representation $var2
  8. {value is a pure string with a refcount of 5, object pointer at 0x11ccf88, string representation "value"}
  9.  

Comments

Posted by avl42 at Tue Jan 14 09:57:45 GMT 2020 [text] [code]

at line 5, the string "value" also sticks around as being the last command's string result. by line 7 that one ref has been replaced by "representation"'s output.