See TIP 131 [http://purl.org/tcl/tip/131] ---- [RS] 2004-07-28 - The RMM part still awaits implementation, but if you transport mind over [stdin], here's an initial implementation: proc do args { puts [uplevel 1 $args] } proc what {who verb} { puts -nonewline "what do you $verb? " flush stdout uplevel 1 [gets stdin] } while 1 {do what I mean} ---- [Category Acronym]