summaryrefslogtreecommitdiff
path: root/tests/test.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'tests/test.tcl')
-rw-r--r--tests/test.tcl11
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/test.tcl b/tests/test.tcl
new file mode 100644
index 0000000..0123b9d
--- /dev/null
+++ b/tests/test.tcl
@@ -0,0 +1,11 @@
+proc hello {} {
+ puts "Hello, World!"
+}
+
+proc add {a b} {
+ return [expr {$a + $b}]
+}
+
+proc complex_proc {name {age 0} args} {
+ puts "Name: $name, Age: $age, Args: $args"
+}