Tcl whileクイズ!

Posted at 2021-12-04

Tclの不可解な挙動にハマって、しばらく悩んじゃったネタを使ってクイズやりま～す。

「え？全部答えいっしょやろ」と思ったあなた！
私と同じレベルですね ;-p

ちなみに私は第一問と第二問の違いを理解するのに1日半かかりました (^^;

この記事は「Tcl/Tk Advent Calendar 2021」の第三日目なのですが、当カレンダーが埋まることはまぁ無いので、クイズの回答は後日のネタにとっておきます(笑)

第一問: 以下の記述は無限ループである。〇か？✖か？エラーか？

set i -2
while {[incr i]} {
    puts $i
}

set i -2
while [incr i] {
    puts $i
}

set i -2
while "[incr i]" {
    puts $i
}

set i -2
while \[incr i] {
    puts $i
}

set i -2
while {\[incr i]} {
    puts $i
}

set i -2
while "\[incr i]" {
    puts $i
}

set i -2
set c {[incr i]}
while $c {
    puts $i
}

set i -2
set c "[incr i]"
while $c {
    puts $i
}

set i -2
set c {\[incr i]}
while $c {
    puts $i
}

set i -2
set c "\[incr i]"
while $c {
    puts $i
}