summaryrefslogtreecommitdiff
path: root/ACE/tests/TkReactor_Test.tcl
diff options
context:
space:
mode:
authorWilliam R. Otte <wotte@dre.vanderbilt.edu>2008-03-04 14:51:23 +0000
committerWilliam R. Otte <wotte@dre.vanderbilt.edu>2008-03-04 14:51:23 +0000
commit99aa8c60282c7b8072eb35eb9ac815702f5bf586 (patch)
treebda96bf8c3a4c2875a083d7b16720533c8ffeaf4 /ACE/tests/TkReactor_Test.tcl
parentc4078c377d74290ebe4e66da0b4975da91732376 (diff)
downloadATCD-99aa8c60282c7b8072eb35eb9ac815702f5bf586.tar.gz
undoing accidental deletion
Diffstat (limited to 'ACE/tests/TkReactor_Test.tcl')
-rw-r--r--ACE/tests/TkReactor_Test.tcl15
1 files changed, 15 insertions, 0 deletions
diff --git a/ACE/tests/TkReactor_Test.tcl b/ACE/tests/TkReactor_Test.tcl
new file mode 100644
index 00000000000..2d9207dc126
--- /dev/null
+++ b/ACE/tests/TkReactor_Test.tcl
@@ -0,0 +1,15 @@
+# This file works in conjunction with the C++ source code in TkReactor_Test.cpp
+
+
+# Create a frame.
+set label_var "label for all events"
+
+# Add the new dude button.
+button .pressme -text "Press me" -command pressme
+
+# Add a quit button.
+button .goodbye -text "Quit" -command exit
+
+label .label_for_event_one -textvariable label_var
+
+pack .label_for_event_one .goodbye .pressme -side top -anchor w