无法编译TCL对象代码，不明白为什么？

管理缩小代码到这下面，任何想法？无法编译TCL对象代码，不明白为什么？

oo::class create RQ1_AREA_MLIMS { 
    method genMethodNameForCheckModelName (model_name } { 
    return "for${model_name}Sdevv" 
    } 
}

我得到这个消息：

wrong # args: should be "oo::class create RQ1_AREA_MLIMS ?definitionScript?" 
    while executing 
"oo::class create RQ1_AREA_MLIMS { 
    method genMethodNameForCheckModelName (model_name } { 
    return "for${model_name}Sdevv" 
    }" 
(file "poca.tcl" line 1) 
invoked from within

我使用Tcl的8.6
感谢。

来源

2017-01-23 user1134991

你在这里使用了一个开放*圆括号*而不是*大括号*：方法genMethodNameForCheckModelName（model_name）' –

问题是这样的线：

method genMethodNameForCheckModelName (model_name } {

问题是这样的字符：

method genMethodNameForCheckModelName (model_name } { 
             ↑

即(应该是一个{;一般的基本Tcl语法。

来源

2017-01-23 22:02:28

是的，字体太糟糕了，我忘了眼镜，看起来就像一个花括号。 – user1134991

无法编译TCL对象代码，不明白为什么？

回答

相关问题