tt.g

来自「这是一个Linux下的集成开发环境」· G 代码 · 共 17 行

server := shell("./testcl",async = T)

print $value

whenever server->stdout do
{
	print $value
	server->stdin("hello")
}

server->stdin("Hello")

server->stdin("hello")