Posted to tcl by emiliano at Wed Aug 17 23:15:21 GMT 2011view pretty

Bytecompiling issue?

(emiliano) 69 % proc foo args {puts foo1}
(emiliano) 70 % trace add command foo delete {proc foo args {puts foo2};#}
(emiliano) 71 % foo
foo1
(emiliano) 72 % rename foo {}
(emiliano) 73 % foo
foo2
(emiliano) 74 % rename foo {}
(emiliano) 75 % proc foo args {puts foo1}
(emiliano) 76 % trace add command foo delete {eval proc foo args {puts foo2};#}
(emiliano) 77 % foo
foo1
(emiliano) 78 % rename foo {}
(emiliano) 79 % foo
invalid command name "foo"