File sample.tclshrc artifact 693bb1ae82 part of check-in 9662b91269
#!/usr/local/bin/tclsh # # FILE: "/krispc6/home/joze/src/tclreadline/sample.tclshrc" # LAST MODIFICATION: "Sat May 8 14:02:19 1999 (joze)" # (C) 1999 by Johannes Zellner # johannes@zellner.org # $Id$ if {$tcl_interactive} { package require tclreadline namespace import ::tclreadline::Print # ::tclreadline::Print no ::tclreadline::Loop }