错误：错误的#args：应该是“ proc name”

Question

这是gui.tcl中的代码脚本：

label .login.nickLabel -text "User:"
entry .login.nick
label .login.hostLabel -text "Host:"
entry .login.host
chat::logic::login [.login.host get] [.login.nick get]

这是logic.tcl中的代码：

proc chat::logic::login {hostName nickName} {
chat::model::getSock $hostName
...
}

这是model.tcl中的代码：

proc chat::model:::getSock {hostName} {
variable sock
set sock [socket $hostName 9988]
fconfigure $sock -buffering line
return $sock
}

当我运行代码时，它报告一个错误：错误的＃args：应该是“ chat :: model :: getSock hostName”

我该如何解决？