如何从 tcl 主脚本调用函数？

Question

我正在阅读有关包装的 Tcl 教程。这些方法是怎么调用的？

包装：

package provide weather  1.0
package require Tcl      8.5

namespace eval ::tutstack {
}

proc ::tutstack::hello {} {
    puts "hello world"
}


proc ::tutstack::sum {arg1 arg2} {
    set x [expr {$arg1 + $arg2}];
    return $x
}

proc ::tutstack::helloWorld {arg1} {
    return "hello plus arg"
}

来自主：

lappend auto_path /home/thufir/NetBeansProjects/spawnTelnet/telnet/api

package require weather 1.0



tutstack::hello

set A 3
set B 4

puts [tutstack::sum $A $B]


puts [tutstack::hello "fred"]

错误：

thufir@dur:~/NetBeansProjects/spawnTelnet/telnet$ 
thufir@dur:~/NetBeansProjects/spawnTelnet/telnet$ tclsh main.tcl 
hello world
7
wrong # args: should be "tutstack::hello"
    while executing
"tutstack::hello "fred""
    invoked from within
"puts [tutstack::hello "fred"]"
    (file "main.tcl" line 15)
thufir@dur:~/NetBeansProjects/spawnTelnet/telnet$ 

Answer 1

哎呀：

lappend auto_path /home/thufir/NetBeansProjects/spawnTelnet/telnet/api

package require weather 1.0



tutstack::hello

set A 3
set B 4

puts [tutstack::sum $A $B]


puts [tutstack::helloWorld "fred"]

感谢格伦