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

ehuelsmann at common-lisp.net ehuelsmann at common-lisp.net
Fri Aug 3 19:06:32 UTC 2012


Author: ehuelsmann
Date: Fri Aug  3 12:06:30 2012
New Revision: 14047

Log:
Test adjustment: remove quoting based on previously incorrect understanding.

Modified:
   trunk/abcl/test/lisp/abcl/mop-tests.lisp

Modified: trunk/abcl/test/lisp/abcl/mop-tests.lisp
==============================================================================
--- trunk/abcl/test/lisp/abcl/mop-tests.lisp	Fri Aug  3 11:56:03 2012	(r14046)
+++ trunk/abcl/test/lisp/abcl/mop-tests.lisp	Fri Aug  3 12:06:30 2012	(r14047)
@@ -571,7 +571,7 @@
      ,@(mapcar (lambda (method)
                  `(call-method ,method))
                methods)
-     (list ,x (length ',others))))
+     (list ,x (length ,others))))
 
 (defgeneric dmc-test-mc.7 (x &rest others)
   (:method-combination dmc-test.7))




More information about the armedbear-cvs mailing list