[slime-cvs] CVS update: slime/swank-lispworks.lisp

[Helmut Eller]

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

Modified Files:
	swank-lispworks.lisp 
Log Message:
(defimplementation): define-dspec-alias seems to more apropriate than
define-form-parser.

Date: Fri Sep  3 23:10:13 2004
Author: heller

Index: slime/swank-lispworks.lisp
diff -u slime/swank-lispworks.lisp:1.54 slime/swank-lispworks.lisp:1.55
--- slime/swank-lispworks.lisp:1.54	Sat Aug 28 04:27:08 2004
+++ slime/swank-lispworks.lisp	Fri Sep  3 23:10:13 2004
@@ -25,8 +25,8 @@
    stream:stream-line-column
    ))
 
-(when (fboundp 'dspec::define-form-parser)
-  (dspec::define-form-parser defimplementation (name args &rest body)
+(when (fboundp 'dspec::define-dspec-alias)
+  (dspec::define-dspec-alias defimplementation (name args &rest body)
     `(defmethod ,name ,args , at body)))
 
 ;;; TCP server