diff options
Diffstat (limited to 'tcllib/support/devel/sak/test/test.tcl')
-rw-r--r-- | tcllib/support/devel/sak/test/test.tcl | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tcllib/support/devel/sak/test/test.tcl b/tcllib/support/devel/sak/test/test.tcl new file mode 100644 index 0000000..c31d974 --- /dev/null +++ b/tcllib/support/devel/sak/test/test.tcl @@ -0,0 +1,19 @@ +# -*- tcl -*- +# (C) 2006 Andreas Kupries <andreas_kupries@users.sourceforge.net> +## +# ### + +namespace eval ::sak::test {} + +# ### + +proc ::sak::test::usage {args} { + package require sak::help + puts stdout [join $args { }]\n[sak::help::on test] + exit 1 +} + +## +# ### + +package provide sak::test 1.0 |