Posted to tcl by aspect at Mon Oct 03 06:03:40 GMT 2016view pretty
% proc putl args {puts $args} % trace add variable \{ write putl % incr \{ \{ {} write 1 % trace add variable \{ write [list uplevel #0 putl] % incr \{ can't set "{": missing close-brace