Changeset 13935


Ignore:
Timestamp:
05/14/12 08:15:53 (9 years ago)
Author:
Mark Evenson
Message:

abcl-test-lisp: rename DO-MATCHING to DO-TESTS-MATCHING.

Use the same name as defined in ANSI-TESTS.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/test/lisp/abcl/package.lisp

    r13607 r13935  
    44  (:export
    55   #:run
    6    #:do-matching #:run-matching
    76   #:do-test
    87   #:do-tests
     8   #:do-tests-matching
    99   ;; previously in file-system-tests.lisp
    1010   #:pathnames-equal-p #:run-shell-command #:copy-file #:make-symbolic-link
    1111   #:touch #:make-temporary-directory #:delete-directory-and-files
     12   ;;; Deprecated
     13   #:do-matching #:run-matching
    1214   ))
    1315(in-package #:abcl.test.lisp)
     
    2830(defvar *last-run-matching* "url-pathname")
    2931
    30 (defun do-matching (&optional (match *last-run-matching*))
     32(defun do-tests-matching (&optional (match *last-run-matching*))
    3133  "Run all tests in suite whose symbol contains MATCH in a case-insensitive manner."
    3234  (setf *last-run-matching* match)
     
    4345
    4446;;; Deprecated
    45 (setf (symbol-function 'run-matching) #'do-matching)
     47(setf (symbol-function 'run-matching) #'do-tests-matching)
     48(setf (symbol-function 'do-matching) #'do-tests-matching)
    4649
    4750   
Note: See TracChangeset for help on using the changeset viewer.