#!/bin/sh # the next line restarts using tclsh \ exec tclsh "$0" "$@" # mod_websh test suite, by David N. Welton # See README file for more information. # $Id$ set host localhost # port is set globally already set urlbase "http://$host:$port/" package require tcltest package require http # Test stanzas are created by giving the test a name and a # description. The code is then executed, and the results # compared with the desired result, which is placed after the # block of code. See man tcltest for more information. foreach Test {hello.test pool.test headers.test} { source [file join test $Test] } ::tcltest::cleanupTests