在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
