Question

我们在C / C ++应用程序中内置了一个 Tcl ，我在代码中找到了一个地方，如果未找到该命令，则会调用 Tcl_EvalObjv 。我必须承认代码很旧，而且我们的开发人员中很少有人知道此模块中发生了什么。

它看起来像这样：

// ... there is some checking if command is registered etc., it fails and the code goes here:
std::vector<Tcl_Obj*> tclArgs = { NULL };
for (int i = 1; i < objc; ++i)
    tclArgs.push_back(objv[i]);
tclArgs.shrink_to_fit();
// ...
tclArgs[0] = ::Tcl_NewStringObj(ORIGINAL_UNKNOWN, ORIGINAL_UNKNOWN_SIZE);
Tcl_IncrRefCount(tclArgs[0]);
::Tcl_ExposeCommand(pInterp, ORIGINAL_UNKNOWN, ORIGINAL_UNKNOWN);
result = ::Tcl_EvalObjv(pInterp, objc, &tclArgs[0], TCL_EVAL_GLOBAL); //<--
::Tcl_HideCommand(pInterp, ORIGINAL_UNKNOWN, ORIGINAL_UNKNOWN);
// ORIGINAL_UNKNOWN is char* it is just "unknown"

我们在应用程序中具有命令处理程序，而在 CmdUnknown（）函数中执行 Tcl_EvalObjv 时，有时会调用不同的命令。以下示例：

现有命令列表：“香蕉”，“小苹果”，“地毯”，“卡片”

命令：“ apple”，Tcl称“ applepie”（错误，“ apple”不是“ applepie”）
命令：“ blah”，Tcl给出错误（正确）。
命令：“ car”，Tcl给出错误（正确，可能是由于2条类似的命令）。

Tcl 是否存在某种无法搜索命令的机制？问题是，我找不到与我们的代码相关的任何可以完成命令的代码，所以 Tcl 可以吗？

Answer 1

正如glenn所暗示的那样，interactive (REPL) mode中的Tcl允许使用一些最小但明确的名称前缀来调度命令。我无法告诉您嵌入式Tcl是如何配置，初始化以及最终以交互方式运行的。但是，您可能想尝试通过以下两种方法之一“关闭”（切换）交互模式：

unset ::tcl_interactive

或

set ::tcl_interactive 0

所有这些都是由默认的unknown处理程序实现的。请注意如何查找cmds的列表以及在tcl_interactive为真或为假时如何区别对待：

puts [info body unknown]

嵌入式Tcl：Tcl是否自动完成命令？

1 个答案: