Posted to tcl by aspect at Sun Aug 24 04:13:33 GMT 2014view pretty
% set x [dict create x y] x y % set y $x x y % ::tcl::unsupported::representation $x value is a dict with a refcount of 8, object pointer at 0xb960b0, internal representation 0xd1dd80:0xcb3d40, string representation "x y" % ::tcl::unsupported::representation $y value is a dict with a refcount of 7, object pointer at 0xb960b0, internal representation 0xd1dd80:0xcb3d40, string representation "x y" % llength $y 2 % ::tcl::unsupported::representation $y value is a list with a refcount of 7, object pointer at 0xb960b0, internal representation 0xd296f0:(nil), string representation "x y" % ::tcl::unsupported::representation [dict create x y] value is a dict with a refcount of 8, object pointer at 0xb960b0, internal representation 0xd56850:(nil), string representation "x y" % ::tcl::unsupported::representation $y value is a dict with a refcount of 8, object pointer at 0xb960b0, internal representation 0xd56850:(nil), string representation "x y" ^^^^ ... wat?