You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
17 lines
1.1 KiB
17 lines
1.1 KiB
2 years ago
|
#string rep generated for variable when script is changed or unset
|
||
|
|
|
||
|
|
set script {set j [list a] ; list}
|
||
|
|
append script "\n"
|
||
|
|
uplevel #0 $script
|
||
|
|
puts stdout [tcl::unsupported::representation $j]
|
||
|
|
puts stdout [tcl::unsupported::representation $j]
|
||
|
|
puts stdout [tcl::unsupported::representation $j]
|
||
|
|
set script ""
|
||
|
|
puts stdout [tcl::unsupported::representation $j]
|
||
|
|
puts stdout [tcl::unsupported::representation $j]
|
||
|
|
|
||
|
|
#value is a list with a refcount of 3, object pointer at 0x833d30, internal representation 0x878810:0x0, no string representation
|
||
|
|
#value is a list with a refcount of 3, object pointer at 0x833d30, internal representation 0x878810:0x0, no string representation
|
||
|
|
#value is a list with a refcount of 3, object pointer at 0x833d30, internal representation 0x878810:0x0, no string representation
|
||
|
|
#value is a list with a refcount of 2, object pointer at 0x833d30, internal representation 0x878810:0x0, string representation "a"
|
||
|
|
#value is a list with a refcount of 2, object pointer at 0x833d30, internal representation 0x878810:0x0, string representation "a"
|