Dictionary

コマンドに「[expr true]」として渡し、その結果をもって処理を続ける。気をつけなければならないのは while コマンドは {〜処理〜} をひと通り評価し終えた後、再度、第一引数を expr で評価するが、上記のコードでは与えられている値が true なので {〜処理〜} の中に「set val