diff options
| author | Neil <nyamatongwe@gmail.com> | 2019-12-14 08:17:00 +1100 |
|---|---|---|
| committer | Neil <nyamatongwe@gmail.com> | 2019-12-14 08:17:00 +1100 |
| commit | 4f1b30ebe70a6475ffeca1ce2c0dc48c8e70a5f9 (patch) | |
| tree | c2cb66991d89802a7a8b18bde9aa486da5fc9614 /lexilla/test/examples/tcl/x.tcl | |
| parent | 651e4b440ad3019a63b10d972ee36a296020e2c8 (diff) | |
| download | scintilla-mirror-4f1b30ebe70a6475ffeca1ce2c0dc48c8e70a5f9.tar.gz | |
Lexilla tests.
Diffstat (limited to 'lexilla/test/examples/tcl/x.tcl')
| -rw-r--r-- | lexilla/test/examples/tcl/x.tcl | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/lexilla/test/examples/tcl/x.tcl b/lexilla/test/examples/tcl/x.tcl new file mode 100644 index 000000000..d1260fc82 --- /dev/null +++ b/lexilla/test/examples/tcl/x.tcl @@ -0,0 +1,13 @@ +# tcl tests + +#simple example + +proc Echo_Server {port} { + set s [socket -server EchoAccept $port] + vwait forever; +} + +# Bug #1947 + +$s($i,"n") +set n $showArray($i,"neighbor") |