[slime-cvs] CVS slime

[CVS User jgarcia]

Update of /project/slime/cvsroot/slime
In directory tiger.common-lisp.net:/tmp/cvs-serv8642

Modified Files:
	swank-ecl.lisp 
Log Message:
In swank-ecl.lisp, import compute-applicable-methods-using-classes when its fboundp (ECL 12.5.1 will provide it).

--- /project/slime/cvsroot/slime/swank-ecl.lisp	2012/04/13 22:50:12	1.74
+++ /project/slime/cvsroot/slime/swank-ecl.lisp	2012/04/20 21:58:18	1.75
@@ -40,11 +40,12 @@
   (import-from :gray *gray-stream-symbols* :swank-backend)
 
   (import-swank-mop-symbols :clos
-    '(:eql-specializer
+    `(:eql-specializer
       :eql-specializer-object
       :generic-function-declarations
       :specializer-direct-methods
-      :compute-applicable-methods-using-classes)))
+      ,@(unless (fboundp 'clos:compute-applicable-methods-using-classes)
+         '(:compute-applicable-methods-using-classes)))))
 
 
 ;;;; TCP Server