Tcl Continue语句

continue;

#!/usr/bin/tclsh

set a 10
# do loop execution 
while { a<20 } {
   if {a == 15} {
      #skip the iteration 
      incr a
      continue
   }
   puts "value of a: $a"
   incr a     
}

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 16
value of a: 17
value of a: 18
value of a: 19