Mercurial > hg > xemacs-beta

diff tests/automated/lisp-tests.el @ 5448:89331fa1c819

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged with trunk.
author Mats Lidell <matsl@xemacs.org>
date Thu, 06 Jan 2011 00:35:22 +0100
parents 6506fcb40fcf 7b391d07b334
children a9094f28f9a9
line wrap: on
line diff
--- a/tests/automated/lisp-tests.el	Fri Dec 31 01:09:41 2010 +0100
+++ b/tests/automated/lisp-tests.el	Thu Jan 06 00:35:22 2011 +0100
@@ -796,12 +796,12 @@
 	     collect `(Check-Error circular-list (,fun 1 (make-circular-list ,n))))))
      (test-funs (&rest funs) `(progn ,@(loop for fun in funs collect `(test-fun ,fun)))))
 
-  (test-funs member old-member
+  (test-funs member* member old-member 
 	     memq   old-memq
-	     assoc  old-assoc
-	     rassoc old-rassoc
+	     assoc* assoc  old-assoc
+	     rassoc* rassoc old-rassoc
 	     rassq  old-rassq
-	     delete old-delete
+	     delete* delete old-delete
 	     delq   old-delq
 	     remassoc remassq remrassoc remrassq))