TCL的字典：

Vivado% dict set colours c1 redc1 redVivado% dict set colours c2 greenc1 red c2 greenVivado% dict set colours c3 bluec1 red c2 green c3 blueVivado% set cs [dict create c1 "black" c2 "white"]c1 black c2 white

字典的大小和字典的迭代：

Vivado% puts [dict size $cs]2Vivado% puts [dict size $colours]3Vivado% foreach  item  [dict keys $cs] {set value [dict get $cs $item]puts $value}blackwhite

字典的键和值及某个键是否存在：

Vivado% set colours [dict create c1 "red" c2 "green" c3 "blue"]c1 red c2 green c3 blueVivado% puts [dict keys $colours]c1 c2 c3Vivado% puts [dict values $colours]red green blueVivado% puts [dict get $colours c2]greenVivado% puts [dict exists $colours c3]1Vivado% puts [dict exists $colours c4]0