在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