Changeset 13009

Timestamp:

11/07/10 12:10:37 (13 years ago)

Author:

Mark Evenson

Message:

Docstring for RUN-MATCHING utility.

File:

• trunk/abcl/test/lisp/abcl/package.lisp (modified) (1 diff)

trunk/abcl/test/lisp/abcl/package.lisp

@@ -23 +23 @@
 ;;; 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))