tcl期望范围

Question

if下的以下设置似乎没有生效，因为if block block：

 16 if {[string compare "$DEBUG" "ON"]!=0} {
 17     exp_internal 1
 18 }
 19 Rest of code that want the debug to be ON.

有没有办法让设置成为全局，因为代码的其余部分依赖于它。

感谢。

Answer 1

if { "$DEBUG" == "ON" } {
    exp_internal 1
}

处理全局设置，您可能希望将-d选项传递给expect二进制文件。根据联系人页面：

  

此标志与Expect脚本开头的“exp_internal 1”具有相同的效果，并打印出Expect的版本