Tcl Source Code

Artifact 6975accad2a3adae74463949c0cfa2f6df928671:

Attachment "main.tcl" to ticket [717848ffff] added by andreas_kupries 2003-04-09 05:20:28.

---

set f [open "|[info nameofexecutable] sub.tcl" r+]
socket localhost 4910
puts [gets $f]
puts [gets $f]
exit