TCL之基本语法1

1:set  and puts

set就是变量声明,这个声明在需要使用的指令下会自动执行,不会出现没有声明的错误。但是对于puts这类定向访问的是不能没有声明的。这里简单理解TCL中的变量:以字符串的形式存在,具体的值由$符号访问。访问之前必须已经有声明。

set x 0
puts $x
puts x

两个puts都是可以显示结果的,掐前一个是值,后一个是字符。

2:expr and []

TCL中的指令长度是确定的,由关键字决定。每个参数使用空格区分。如果需要将指令内的某个参数嵌套其他指令,则需要使用[]来确认嵌套指令的范围。expr是取算数计算的结果的指令,参数就是算数表达式。

set x 0
set x [expr $x+1]
puts $x

最后的结果是1,第二句语句就是将x加1.

3:list and {}

前面介绍如何嵌入指令,同样含有空格的字符串也是需要嵌入的(某些参数需要带有空格及特殊字符的字符串作为参数)。使用{}可以将内部的内容转化为特殊字符串变量,在TCL中为list型变量。list作为参数时,内部的符号都是由对应指令控制的,而不是按照指令解释。这里有许多对list操作的指令,以后有时间详细分析。

set x {1 2 3 {1 2} 2 {4 5}}
puts $x

x的值就是后面的一串list型变量

4:if and elseif

TCL中的条件判断语句。

if { $x==0 } {
set x 1
puts $x
} elseif { $x==1 } {
set x 2
puts $x
} elseif { $x==2 } {
set x 3
puts $x
} elseif { $x<11 } {
set x [expr $x+1]
puts $x

具体的形式和C语言相似,注意参数只有两个,每个都用{}声明,且参数间使用空格区分。

5:while and for

TCL中的循环语句,参数位置和C语言相似,声明按照TCL语法即可。

while { $x<10 } {
if { $x==0 } {
set x 1
puts $x
} elseif { $x==1 } {
set x 2
puts $x
} elseif { $x==2 } {
set x 3
puts $x
} elseif { $x<11 } {
set x [expr $x+1]
puts $x
}
} for {
set i 0 } {
$i<10
} {
incr i 1
} {
puts i=$i
}

while两个参数,第一个循环条件,第二个执行体。for有四个参数,第一个初始执行体(开始前执行一次),第二个循环条件,第三个条件执行体,第四个循环执行体。每个参数按照C语言中的for可以完全对应。

6:foreach

list循环结构,这是比较特殊的循环。其判断条件是list型变量的长度及读取尺度,执行体和for是一样的。第一个参数是读取长度及缓存变量,第二个是待读取的list型变量。第三个是执行体。

set b " "
set a {10 100 2300 {1} }
foreach i $a {
set b [linsert $b 0 $i]
puts $i
puts $b
} set x {}
foreach {i j} {a b c d e f} {
lappend x $j $i
puts x=$x
}

第一个foreach中,读取长度是1(i只有一个字符),缓存变量是i,待读取的list(可以直接写,也可以是已经存在的,已存的需要加$读取符),执行的就是最后的参数的内容。linsert是字符插入指令,这里暂时不解释。

第二个就是将长度换成2,缓存变量变成i和j,其他的是一样的。

7:eval and source

eval是命令解读指令。source是调用外部文件的指令。

#!/bin/sh
# eval_source.tcl \
exec tclsh "$0" ${1+"$@"}
eval set b 2 ;set b 4
puts $b set cmd "puts \"I love you \""
eval $cmd source D:/Library/TCL_design/T1_workspace/A3_string.tcl

这里cmd声明为字符串(真正的和C语言中一样的字符串,注意转义字符\的使用),可以将命令转化为字符串,由eval解释执行。这里可以使用其他系统命令。source就是直接调用外部可执行的文件。

TCL之基本语法1的更多相关文章

  1. Tcl学习之--语法|变量

    [语法|变量] l 脚本.命令和单词 Tcl提供了大约100条命令.Tk提供了另外几十条,脚本包括一条或多条,通过换行符或分号分隔开. set a 12 set b 23 也能够写成一行: set a ...

  2. [NS2]TCL语言基本语法

    (来自:<NS2仿真实验-多媒体和无线网络通信>) 1. 变量(Variable)和变量替换(Variable Substitution) tcl变量是在第一次使用set的指令来指派变量的 ...

  3. tcl之基本语法—3

  4. tcl之基本语法—2

  5. tcl之基本语法—1

  6. TCL语言笔记:TCL基础语法

    一.什么是TCL Tcl 全称是 Tool command Language.它是一个基于字符串的命令语言,基础结构和语法非常简单,易于学习和掌握. Tcl 语言是一个解释性语言,所谓解释性是指不象其 ...

  7. Tcl与Design Compiler (二)——DC综合与Tcl语法结构概述

    1.逻辑综合的概述 synthesis = translation + logic optimization + gate mapping . DC工作流程主要分为这三步 Translation : ...

  8. Tcl介绍和基础语法

    Tcl的背景 Tcl(读作tickle)诞生于80年代的加州大学伯克利分校,作为一种简单高效可移植性好的脚本语言,目前已经广泛应用在几乎所有的EDA工具中.Tcl 的最大特点就是其语法格式极其简单,采 ...

  9. DC综合与Tcl语法结构概述

    转载:https://www.cnblogs.com/IClearner/p/6617207.html 1.逻辑综合的概述 synthesis = translation + logic optimi ...

  10. TCL语言笔记:TCL中的控制结构命令

    一.引言 控制结构允许程序根据不同的状态.条件和参数来选择不同的处理和执行路径,从而使代码具有更强的灵活性.健壮性和可读性. Tcl 提供了 if.if/else.if/elseif.foreach. ...

随机推荐

  1. 详解最新版RabbitMQ 基于RPM 方式的安装

    如何选择安装版本 已经不支持的发布系列 版本 最后补丁版本 首次发布时间 停止更新时间 3.7 3.7.28 2017年11月28日 2020年09月30日 3.6 3.6.16 2015年12月22 ...

  2. InnoDB中不同SQL语句设置的锁

    锁定读(locking read).更新(UPDATE)或删除(DELETE)通常会在SQL语句处理过程中扫描的每个索引记录上设置记录锁.语句中是否存在排除行的WHERE条件并不重要.InnoDB不记 ...

  3. Working with Dates in PL/SQL(PL/SQL中使用日期)

    Working with Dates in PL/SQL By Steven Feuerstein  史蒂芬.佛伊尔斯坦 The previous articles in this introduct ...

  4. C++ 多线程的错误和如何避免(5)

    要记得对加锁的临界区解锁 前提:在多个线程共享一块资源或者数据时,我们需要加上互斥锁来保护临界区(否则出现数据未定义的行为) 问题:我们往往在写了很多代码之后忘记 unlock 互斥锁,那么等待该资源 ...

  5. OpenCV开发笔记(六十三):红胖子8分钟带你深入了解SIFT特征点(图文并茂+浅显易懂+程序源码)

    若该文为原创文章,未经允许不得转载原博主博客地址:https://blog.csdn.net/qq21497936原博主博客导航:https://blog.csdn.net/qq21497936/ar ...

  6. pika

    生产者代码 # -*- coding: utf-8 -*- # pylint: disable=C0111,C0103,R0205 import json import pika from pika. ...

  7. ubuntu 中 docker 每次都输入 sudo 命令

    查看用户组及成员 sudo cat /etc/group | grep docker 可以添加docker组 sudo groupadd docker 添加用户到docker组 sudo gpassw ...

  8. TypeScript项目开发运行(即时编译、运行,所见所得)

    1.项目*.ts自动编译 $ tsc . --watch 2.项目本地web服务运行 $ npm install --save-dev webpack-dev-server npm install - ...

  9. 【Azure Redis 缓存】Azure Redis Cluster 在增加分片数时失败分析

    问题描述 Azure Redis Cluster 在增加分片数时失败,错误消息为: ResponseBody: { "error": { "details": ...

  10. C++ STL 容器 list类型

    C++ STL 容器 list类型 list对于异常支持很好,要么成功,要么不会发生什么事情 以下是 std::list 在异常处理方面表现良好的几个原因: 动态内存管理:std::list 使用动态 ...