atdict:活跃的Tcl词典

atdict：活跃的Tcl词典 Atdict是一项实验，旨在创建行为类似于Javascript对象的Tcl词典：可以使用“。”来访问键。 符号和方法已分配给键。 语法范例 创建字典： set myobj [@] 为键分配一个值： @ myobj.name = "Fred" 将表达式的值分配给键： @ myobj.name := {$x + $y} 检索键的值： puts [@ myobj.name] 在对象上定义一个方法： @ myobj.greeting -> {who} { puts "Hello, $who!" } 调用方法： @ myobj.greeting: "World" 方法可以通过“ this”变量访问字典： @ myobj.double -> {key} { @ this.$key := {2*[@ this.$key]} } 方法