namespace eval ::nasA {
namespace export a b
}
proc ::nasA::a {} {return "aaa"}
proc ::nasA::b {} {return "bbb"}
proc ::nasA::etc {} {return "..."}
namespace eval ::cur {
namespace import ::nasA::*
proc c {} {return "ccc"}
puts "[a] [b] [c]"
}
命名空间的操作,导入导出,应用程序开放接口可以选择使用。