TCL编程语言简介

---

前言

TCL（Tool Command Language）是一种解释型编程语言，它的主要设计目标是提供一个简单易用的脚本语言，而且可以方便地嵌入到其他程序中。TCL最初由约翰·奥斯汀（John Ousterhout）在1988年开发。TCL被广泛应用于自动化测试、GUI设计和网络编程等领域。

基础语法

一. 变量

变量用于存储TCL命令所使用的值。TCL中的变量使用set命令进行创建和赋值，无需提前声明。变量名区分大小写，调用变量时使用$符号。
使用set_app_var命令为变量赋值。set_app_var命令确保指定的变量实际上是一个工具特定的变量，并且还执行了数据类型检查。
例如，要设置search path，使用以下命令：
set_app_var search_path {./user/synopsys/libraries/}

要为用户定义的变量赋值，则需要使用set命令。 如果变量不存在，工具会创建它并将其初始值设置为指定的值。
例如，要创建名为my_design的用户定义变量，并将其值设置为TOP_DESIGN，使用以下命令：
set my_design TOP_DESIGN
使用unset命令删除用户定义的变量，但无法删除工具定义的特定变量。

1. 变量的数据类型

变量可以是字符串、列表、数组等多种类型。

a) 列表

列表是TCL中一种数据结构，是元素的有序集合，元素可以包含任何字符串，如空格、反斜线、换行符等，可以把列表赋值给一个变量、作为参数传给命令、嵌套到其他列表中。
通过set命令创建列表，该命令后有两个参数：列表名、列表包含的元素。元素位于一个大括号之内且以空格为界，如果某个元素中包含空格，则将该元素放在大括号或双引号之内。
TCL列表除了用[list ]，还可以使用双引号或花括号等来定义。

代码如下（示例）：

#创建列表x
set x "a b c";
puts "Item at index 2 of the list{$x} is : [lindex $x 2]\n";
#创建列表y
set y {
   a b {
   cd} {
   e f {
   g h}}}
puts "Treated as a list : $y\n"
#创建列表z
set z [list puts "arg 2 is $y"];
puts "A command resemble : $z\n";

#执行结果
a b c
Item at index 2 of the list{
   a b c} is : c

a b {
   cd} {
   e f {
   g h}}
Treated as a list : a b {
   cd} {
   e f {
   g h}}

puts {
   arg 2 is 12 3 56}
A command resemble : puts {
   arg 2 is 12 3 56}

b) 数组

数组是一些元素的集合。TCL的数组和普通计算机语言中的数组有很大的区别。在TCL中，不能单独声明一个数组，数组只能和数组元素一起声明。数组中，数组元素的名字包含两部分：数组名和数组中元素的名字，TCL中数组元素的名字可以为任何字符串。

代码如下（示例）：

set day(monday) 1; set day(tuesday) 2 #第一个命令生成一个名为day的数组，同时在数组中生成一个名为monday的数组元素，并把值置为1，第二个命令生成一个名为tuesday的数组元素，并把值置为2
set a monday; set day(monday) 1; set b \$day