diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/test.tcl | 11 |
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" +} |
