ns2代码分析（二）-tcl文件处理

   ns2可以解释tcl脚本，编译后，我修改了tcl/lib/ns-lib.tcl，在里面增加了一个函数。

Simulator instproc  debug-fun {} {
set var "base"
return $var
}

   然后写了一个测试脚本test.tcl

set ns [new Simulator]
set node1 [$ns node]
set value [$ns debug-fun]
puts $value

   执行后，却提示错误。(_o3 cmd line 1)invoked from within"_o3 cmd debug-fun"。重新编译ns，则可以出现正确的结果。觉得很疑惑，难道ns2还可以预先编译字节码，之后执行指令吗？但是却没有发现相关代码。tcl中的解释代码似乎也没有这个功能。

   这个问题，令人困惑。于是花了点时间，翻到了Makefile.in文件，有这样一句话

$(GEN_DIR)ns_tcl.cc: $(NS_TCL_LIB)
$(TCLSH) bin/tcl-expand.tcl tcl/lib/ns-lib.tcl @V_NS_TCL_LIB_STL@ | $(TCL2C) et_ns_lib > $@

  这句话生成了ns_tcl.cc文件，执行make之后，可以看到这个生成文件中的内容，里面是个大数组static char code[]。可以找到之前自定义的脚本函数：

Simulator instproc  debug-fun {} {\n\
set var \"base\"\n\
return $var\n\
}\n\

  这个cc文件被编译进了ns的二进制代码中，也算是一种字节码吧。所以，修改了tcl文件的中的脚本文件，而不重新编译ns2，修改的内容是无法生效的。

[1]理解NS2中的OTcl/tclCL