想从tcl文件中启动化石

Question

您好我想使用tcl文件启动化石。我一直在尝试使用tcl文件中的exec运行化石设置代码，例如化石克隆，但它没有运行。

任何人都可以帮助我如何从tcl文件中运行化石。因此，当我运行该文件时，会创建一个fossil文件夹并使用指定的存储库进行克隆。

Answer 1

将化石作为子过程运行的主要棘手的事情是它喜欢有时与终端交谈。处理这个问题的最简单方法是制作一个小包装程序来隐藏魔法：

set FOSSIL_PATH /path/to/fossil.exe

proc fossil args {
    global FOSSIL_PATH
    exec $FOSSIL_PATH {*}$args <@stdin 2>@stderr
}

然后您的代码可以执行此操作：

fossil clone $repo repo.fossil
file mkdir repo
cd repo
fossil open ../repo.fossil

（或者至少当我在合适的目录中使用fossil status进行测试时，它似乎对我有用。）