diff options
Diffstat (limited to 'test/examples/x.tcl.styled')
| -rw-r--r-- | test/examples/x.tcl.styled | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/examples/x.tcl.styled b/test/examples/x.tcl.styled new file mode 100644 index 000000000..b9d419b41 --- /dev/null +++ b/test/examples/x.tcl.styled @@ -0,0 +1,8 @@ +{2}# tcl tests +{0} +{2}#simple example +{0} +{12}proc{0} {7}Echo_Server{0} {6}{{7}port{6}}{0} {6}{ +{0} {12}set{0} {7}s{0} {6}[{12}socket{0} {10}-server{0} {7}EchoAccept{0} {8}$port{6}] +{0} {12}vwait{0} {7}forever{0} +{6}} |