#==============================================================================
#                                    all
#------------------------------------------------------------------------------
# Run all tests scripts.
#------------------------------------------------------------------------------
# $Id: all,v 2.0 1992/11/02 03:56:09 markd Rel $
#==============================================================================

foreach test [lsort [glob *.test]] {
    echo "---------- $test ----------"
    if {[catch {source $test} msg] != 0} {
        global $errorInfo
        puts stderr "Uncaught error in $test: $msg"
        puts stderr $errorInfo
    }
}
