我有一堆Python函数。我们称他们为foo
,bar
和baz
。它们接受可变数量的字符串参数,并执行其他复杂的操作(如访问网络)。
我希望“用户”(让我们假设他只熟悉Tcl)使用这些功能在Tcl中编写脚本。
以下是用户可以提出的示例(摘自Macports):
post-configure {
if {[variant_isset universal]} {
set conflags ""
foreach arch ${configure.universal_archs} {
if {${arch} == "i386"} {append conflags "x86 "} else {
if {${arch} == "ppc64"} {append conflags "ppc_64 "} else {
append conflags ${arch} " "
}
}
}
set profiles [exec find ${worksrcpath} -name "*.pro"]
foreach profile ${profiles} {
reinplace -E "s|^(CONFIG\[ \\t].*)|\\1 ${conflags}|" ${profile}
# Cures an isolated case
system "cd ${worksrcpath}/designer && \
${qt_dir}/bin/qmake -spec ${qt_dir}/mkspecs/macx-g++ -macx \
-o Makefile python.pro"
}
}
}
这里,variant_issset
,reinplace
等等(除了Tcl builtins)实现为Python函数。 if
,foreach
,set
等是正常的Tcl结构。 post-configure
是一个Python函数,它接受一个稍后可以执行的Tcl代码块(反过来显然最终会调用上面提到的Python“函数”)。
这可以用Python做吗?如果是这样,怎么样?
from Tkinter import *; root= Tk(); root.tk.eval('puts [array get tcl_platform]')
是我所知道的唯一集成,显然非常有限(更不用说它在mac上启动X11服务器这一事实)。
答案 0 :(得分:7)
通过一些实验,我发现你可以做这样的事情来创建一个tcl解释器,注册一个python命令,并从Tcl调用它:
import Tkinter
# create the tcl interpreter
tcl = Tkinter.Tcl()
# define a python function
def pycommand(*args):
print "pycommand args:", ", ".join(args)
# register it as a tcl command:
tcl_command_name = "pycommand"
python_function = pycommand
cmd = tcl.createcommand(tcl_command_name, python_function)
# call it, and print the results:
result = tcl.eval("pycommand one two three")
print "tcl result:", result
当我运行上面的代码时,我得到:
$ python2.5 /tmp/example.py
pycommand args: one, two, three
tcl result: None
答案 1 :(得分:-1)
@Brian - 我必须进行实验以获得正确的结果
from Tkinter import Tcl
tcl = Tcl()
result = tcl.eval(' puts "hello, world" ')
请注意单引号和双引号的位置。这给了我预期的输出:你好,世界
单引号或双引号的任何其他组合导致以下追溯:
File "<stdin>", line 1, in <module>
_tkinter.TclError: can not find channel named "hello,"
--- fracjackmac