[slime-cvs] CVS slime

[CVS User heller]

Update of /project/slime/cvsroot/slime
In directory cl-net:/tmp/cvs-serv31641

Modified Files:
	ChangeLog swank-ccl.lisp 
Removed Files:
	swank-openmcl.lisp test-all.sh 
Log Message:
* swank-openmcl.lisp: Removed. 1.4 is out so no longer needed.
* swank-ccl.lisp: Update accordingly.

* test-all.sh: Removed. Not used in ages.


--- /project/slime/cvsroot/slime/ChangeLog	2009/10/28 20:52:20	1.1896
+++ /project/slime/cvsroot/slime/ChangeLog	2009/10/30 10:57:55	1.1897
@@ -1,3 +1,10 @@
+2009-10-30  Helmut Eller  <heller at common-lisp.net>
+
+	* swank-openmcl.lisp: Removed. 1.4 is out so no longer needed.
+	* swank-ccl.lisp: Update accordingly.
+
+	* test-all.sh: Removed. Not used in ages.
+
 2009-10-28  Helmut Eller  <heller at common-lisp.net>
 
 	Simpler modeline code.
--- /project/slime/cvsroot/slime/swank-ccl.lisp	2009/10/24 11:32:18	1.8
+++ /project/slime/cvsroot/slime/swank-ccl.lisp	2009/10/30 10:57:55	1.9
@@ -52,14 +52,6 @@
 
 (in-package :swank-backend)
 
-;; Backward compatibility
-(eval-when (:compile-toplevel)
-  (unless (fboundp 'ccl:compute-applicable-methods-using-classes)
-    (compile-file (make-pathname :name "swank-openmcl" :type "lisp" :defaults swank-loader::*source-directory*)
-                  :output-file (make-pathname :name "swank-ccl" :defaults swank-loader::*fasl-directory*)
-                  :verbose t)
-    (invoke-restart (find-restart 'ccl::skip-compile-file))))
-
 (eval-when (:compile-toplevel :execute :load-toplevel)
   (assert (and (= ccl::*openmcl-major-version* 1)
                (>= ccl::*openmcl-minor-version* 4))