package provide app_shell 1.0 package require Thread package require shellfilter package require punk::repl repl::init -type 0 set replresult [repl::start stdin -title app_shell] if {[string is integer -strict $replresult]} { exit $replresult } else { if {$replresult ne ""} { puts stdout $replresult flush stdout } exit 0 }