[armedbear-cvs] r13009 - trunk/abcl/test/lisp/abcl

[Mark Evenson]

Author: mevenson
Date: Sun Nov  7 07:10:37 2010
New Revision: 13009

Log:
Docstring for RUN-MATCHING utility.



Modified:
   trunk/abcl/test/lisp/abcl/package.lisp

Modified: trunk/abcl/test/lisp/abcl/package.lisp
==============================================================================
--- trunk/abcl/test/lisp/abcl/package.lisp	(original)
+++ trunk/abcl/test/lisp/abcl/package.lisp	Sun Nov  7 07:10:37 2010
@@ -22,6 +22,7 @@
 
 ;;; XXX move this into test-utilities.lisp?
 (defun run-matching (&optional (match *last-run-matching*))
+  "Run all tests in suite whose symbol contains MATCH in a case-insensitive manner."
   (setf *last-run-matching* match)
   (let* ((matching (string-upcase match))
          (tests