CONDITION classes are instances but disjoint from other kinds of classes
[sbcl.git] / tests / run-tests.sh
blob2041e0be130d1f15211a45473df4208f3ce6508b
1 #!/bin/sh
3 # This software is part of the SBCL system. See the README file for
4 # more information.
6 # While most of SBCL is derived from the CMU CL system, the test
7 # files (like this one) were written from scratch after the fork
8 # from CMU CL.
10 # This software is in the public domain and is provided with
11 # absolutely no warranty. See the COPYING and CREDITS files for
12 # more information.
14 if [ "$1" = "--help" ]; then
15 cat <<EOF
16 Run the regression tests in this directory.
18 Usage: $0 [OPTIONS] [files]
20 Options:
22 --evaluator-mode Either compile or interpret. Set the
23 value SB-EXT:*EVALUATOR-MODE* while
24 running tests.
25 --break-on-failure Break into the debugger when a test fails
26 unexpectedly
27 --break-on-expected-failure Break into the debugger when any test fails
28 --report-skipped-tests Include tests :skipped-on target SBCL in
29 the test report.
30 --no-color Disable coloring of results.
32 If no test files are specified, runs all tests.
33 EOF
34 exit 0
38 . ./subr.sh
40 echo /running tests on \'$SBCL_RUNTIME --core $SBCL_CORE $SBCL_ARGS\'
42 tenfour () {
43 if [ $1 = $EXIT_TEST_WIN ]; then
44 echo ok
45 else
46 echo test failed, expected $EXIT_TEST_WIN return code, got $1
47 exit 1
50 set +u
51 run_sbcl \
52 --eval '(with-compilation-unit () (load "run-tests.lisp"))' \
53 --eval '(run-tests::run-all)' $*
55 tenfour $?
57 echo '//apparent success (reached end of run-tests.sh normally)'
58 date