Sentinel test: foreach_instance_id implements 'break'.
This commit is contained in:
parent
2586ea7637
commit
58f104e2ee
@ -275,6 +275,8 @@ proc foreach_instance_id {instances idvar code} {
|
|||||||
error $result $::errorInfo $::errorCode
|
error $result $::errorInfo $::errorCode
|
||||||
} elseif {$errcode == 4} {
|
} elseif {$errcode == 4} {
|
||||||
continue
|
continue
|
||||||
|
} elseif {$errcode == 3} {
|
||||||
|
break
|
||||||
} elseif {$errcode != 0} {
|
} elseif {$errcode != 0} {
|
||||||
return -code $errcode $result
|
return -code $errcode $result
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user