+
−# -*- mode: tcl -*-
+
−
+
−if {$tcl_interactive} {
+
−    package require tclreadline
+
−    ::tclreadline::Loop
+
−}