[slime-cvs] CVS slime

[heller]

Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv24250

Modified Files:
	ChangeLog swank.asd 
Log Message:
* swank.asd: Don't make a compile-op a no-op so that a
swank-loader.fasl file gets generated and (require 'swank) can be
called multiple times.  (Patch by Travis Cross.)

--- /project/slime/cvsroot/slime/ChangeLog	2008/04/17 14:56:43	1.1344
+++ /project/slime/cvsroot/slime/ChangeLog	2008/04/17 15:21:57	1.1345
@@ -1,3 +1,9 @@
+2008-04-17  Travis Cross <travis at travislists.com>
+	
+	* swank.asd: Don't make a compile-op a no-op so that a
+	swank-loader.fasl file gets generated and (require 'swank) can be
+	called multiple times.
+
 2008-04-17  Zach Beane <xach at xach.com>
 
 	C-c C-c with prefix args now uses the maximal debug level.
--- /project/slime/cvsroot/slime/swank.asd	2008/03/04 13:40:50	1.8
+++ /project/slime/cvsroot/slime/swank.asd	2008/04/17 15:21:57	1.9
@@ -26,17 +26,6 @@
 
 (defclass swank-loader-file (asdf:cl-source-file) ())
 
-;;;; make compile-op a nop
-
-(defmethod asdf:output-files ((o asdf:compile-op) (f swank-loader-file))
-  (list (asdf:component-pathname f)))
-
-(defmethod asdf:perform ((o asdf:compile-op) (f swank-loader-file))
-  t)
-
-(defmethod asdf:operation-done-p ((o asdf:compile-op) (f swank-loader-file))
-  t)
-
 ;;;; after loading run init
 
 (defmethod asdf:perform ((o asdf:load-op) (f swank-loader-file))