X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Frun-tests.sh;h=ed1b498962383529a120cf67e3c8939ae8188e76;hb=cf49f2d086069a9c1b57f501df9a6a0bd3a34c3c;hp=0ea9c8568dab486a7c827b930c46b706313c276a;hpb=9572928844c012d71ea60287bc10d3fe86538c54;p=sbcl.git

diff --git a/tests/run-tests.sh b/tests/run-tests.sh
index 0ea9c85..ed1b498 100755
--- a/tests/run-tests.sh
+++ b/tests/run-tests.sh
@@ -1,19 +1,5 @@
 #!/bin/sh
 
-# Run the regression tests in this directory.
-#
-# Usage: run-tests.sh [OPTIONS] [files]
-#
-# Valid options are as follows:
-#
-#  --break-on-failure            Break into the debugger when a test fails
-#                                unexpectedly
-#  --break-on-expected-failure   Break into the debugger when any test fails
-#  --report-skipped-tests        Include tests :skipped-on target SBCL in
-#                                the test report.
-#
-# If no test files are specified, runs all tests.
-
 # This software is part of the SBCL system. See the README file for
 # more information.
 #
@@ -25,6 +11,27 @@
 # absolutely no warranty. See the COPYING and CREDITS files for
 # more information.
 
+if [ "$1" = "--help" ]; then
+    cat <<EOF
+Run the regression tests in this directory.
+
+Usage: $0 [OPTIONS] [files]
+
+Options:
+
+  --break-on-failure            Break into the debugger when a test fails
+                                unexpectedly
+  --break-on-expected-failure   Break into the debugger when any test fails
+  --report-skipped-tests        Include tests :skipped-on target SBCL in
+                                the test report.
+  --no-color                    Disable coloring of results. 
+
+If no test files are specified, runs all tests.
+EOF
+    exit 0
+fi
+
+
 . ./subr.sh
 
 echo /running tests on \'$SBCL_RUNTIME --core $SBCL_CORE $SBCL_ARGS\'