namespace eval A {
namespace eval B {
proc C {} {
puts hi
}
}
}
proc D {} {}
set ok1 {["]"]}
set ok2 {["][]"]}
set not_ok {["]["]}
puts $ok1 ;# ["]"]
puts $ok2 ;# ["][]"]
puts $not_ok ;# ["]["]
bmFtZXNwYWNlIGV2YWwgQSB7CgoJbmFtZXNwYWNlIGV2YWwgQiB7CgkJcHJvYyBDIHt9IHsKCQkJcHV0cyBoaQoJCX0KCX0KfQoKcHJvYyBEIHt9IHt9CgoKc2V0IG9rMSB7WyJdIl19CnNldCBvazIge1siXVtdIl19CnNldCBub3Rfb2sge1siXVsiXX0KcHV0cyAkb2sxICAgICAgICAgICAgOyMgWyJdIl0KcHV0cyAkb2syICAgICAgICAgICAgOyMgWyJdW10iXQpwdXRzICRub3Rfb2sgICAgICAgICA7IyBbIl1bIl0=