diff options
Diffstat (limited to 'src/Test.tcl')
-rwxr-xr-x | src/Test.tcl | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/src/Test.tcl b/src/Test.tcl deleted file mode 100755 index 052b3bb..0000000 --- a/src/Test.tcl +++ /dev/null @@ -1,17 +0,0 @@ -load libtclivy.so.3.5 -proc conCB { app str2 } { - puts "TCL:Application:$app $str2" -} -proc discCB { app str2 } { - puts "TCL:Application:$app $str2" -} -proc msgCB {str} { - puts "TCL:Message:$str" -} -Ivy::init TESTTCL "TESTTCL Ready" conCB discCB -Ivy::start "" -Ivy::bind "(.*)" msgCB -Ivy::applist -Ivy::send test -Ivy::applist -vwait tcl_interactive |