Tclx：有没有办法使用commandloop保存历史记录

Question

在tclx中，是否可以在交互模式下保存历史记录并访问交互式控制台以在linux shell中发送选项卡？

package require Tclx
proc customPrompt { } {
    return "TC> "
}
commandloop -interactive on -prompt1 customPrompt

Answer 1

我在tclsh：

周围包装了一个函数

tclsh() {
    if [ $# -gt 0 ]; then
        command tclsh "$@"
    else
        rlwrap tclsh
    fi
}

rlwrap为您提供readline命令行编辑，就像您在shell提示符下一样。