X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ftcl%2Fharness.tcl;fp=t%2Ftcl%2Fharness.tcl;h=2856a1c933690dbb835e76ef9570063f9c600f84;hb=3c6a0ce7ac46c66d6b7b48d63cbfc0470ae991e1;hp=0000000000000000000000000000000000000000;hpb=d4567ecb6ca5553f47cd984a8f0a584d8251731b;p=scpubgit%2FTenDotTcl.git

diff --git a/t/tcl/harness.tcl b/t/tcl/harness.tcl
new file mode 100644
index 0000000..2856a1c
--- /dev/null
+++ b/t/tcl/harness.tcl
@@ -0,0 +1,5 @@
+lappend ::auto_path snit ten
+package require ten::test
+namespace import ten::test::*
+proc BEGIN {meh} {}
+source [lindex $argv 0]