You need to put the opening brace of the command on the same line:
for {set i 0} {$i < $sug} {incr i} { puts "predef $predef" }