ns2上leach协议移植问题

[VOAID]

在linux系统上编译完成后，运行test文件后，leach.err文件报错

invalid command name "../../mit/uAMPS/sims/leach.tcl"
while executing
"../../mit/uAMPS/sims/leach.tcl"
(file "tcl/mobility/leach.tcl" line 1)
invoked from within
"source.orig tcl/mobility/leach.tcl"
("uplevel" body line 1)
invoked from within
"uplevel source.orig [list $fileName]"
invoked from within
"if [$instance_ is_http_url $fileName] {
set buffer [$instance_ read_url $fileName]
uplevel eval $buffer
} else {
uplevel source.orig [list $fileName]
..."
(procedure "source" line 8)
invoked from within
"source tcl/mobility/$opt(rp).tcl"
(file "tcl/ex/wireless.tcl" line 187)