while - Exécute un script répétitivement tant qu'une condition est rencontrée

SYNTAXE

 while test corps

DESCRIPTION

La commande while évalue test comme expression (de la même façon que expr évalue ses arguments). La valeur de l'expression doit une valeur booléenne correcte; si c'est la valeur true alors body est exécuté par transmission à l'interpréteur Tcl. Une fois que body a été exécuté alors test est évalué de nouveau, et le processus recommence jusqu’à ce que éventuellement test évalue à une valeur booléenne false. Des commandes continue peuvent être exécutées à l’intérieur de body pour terminer l'itération courante de la boucle, et des commandes break peuvent être exécutées à l’intérieur body pour provoquer la fin immédiate de la commande while. La commande while retourne toujours une chaîne vide.

Note: test devra presque toujours être entourée d'accolades Sinon, les substitutions de variable seront faites avant que la commande while démarre l'exécution, ce qui signifie que le changement de la variable fait par le corps de la boucle ne sera pas considéré dans l'expression. Ceci donnera souvent une boucle infinie. Si test est entourée d'accolades, les substitutions de variables sont retardées jusqu’à ce que l'expression soit évaluée (avant chaque itération de boucle), donc les changements de la variables seront visible. Comme exemple, essayez le script suivant avec et sans accolades autour de $x<10:

 set x 0
 while {$x<10} {
     puts "x est $x"
     incr x
 }

Traduit par Michel Salvagniac 2002-2003

Mis à jour le 19 septembre 2012 à 11:44 CEST par Stéphane Aulery