aboutsummaryrefslogtreecommitdiffhomepage
path: root/lexilla/test/examples/tcl/x.tcl.styled
diff options
context:
space:
mode:
Diffstat (limited to 'lexilla/test/examples/tcl/x.tcl.styled')
-rw-r--r--lexilla/test/examples/tcl/x.tcl.styled13
1 files changed, 13 insertions, 0 deletions
diff --git a/lexilla/test/examples/tcl/x.tcl.styled b/lexilla/test/examples/tcl/x.tcl.styled
new file mode 100644
index 000000000..66af41327
--- /dev/null
+++ b/lexilla/test/examples/tcl/x.tcl.styled
@@ -0,0 +1,13 @@
+{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}}
+{0}
+{2}# Bug #1947
+{0}
+{8}$s{6}({8}$i{6},{5}"n"{6})
+{12}set{0} {7}n{0} {8}$showArray{6}({8}$i{6},{5}"neighbor"{6})