Tcl - Break 语句

---

Tcl语言中的break语句用于终止循环。当循环内遇到break语句时，循环立即终止，程序控制从循环后面的下一条语句恢复。

如果您使用嵌套循环（即一个循环嵌套在另一个循环中），break 语句将停止最内层循环的执行，并开始执行该块之后的下一行代码。

句法

Tcl 中的break语句的语法如下 -

break;

流程图

例子

#!/usr/bin/tclsh

set a 10

# while loop execution 
while {$a < 20 } {
   puts "value of a: $a"
   incr a
   if { $a > 15} {
      # terminate the loop using break statement 
      break
   }
}

当上面的代码被编译并执行时，它会产生以下结果 -

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15