[slime-cvs] CVS slime/contrib
CVS User trittweiler
trittweiler at common-lisp.net
Thu May 13 04:59:12 UTC 2010
Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv16827/contrib
Modified Files:
swank-arglists.lisp
Log Message:
* swank.lisp (*after-init-hook*, simple-break)
(coerce-to-condition, use-threads-p, current-thread-id): Moved
around in swank.lisp.
(with-temp-package): Deleted; not used anywhere.
(ensure-list): Use in SWANK-REQUIRE.
--- /project/slime/cvsroot/slime/contrib/swank-arglists.lisp 2010/04/05 14:48:55 1.65
+++ /project/slime/cvsroot/slime/contrib/swank-arglists.lisp 2010/05/13 04:59:11 1.66
@@ -30,10 +30,6 @@
(and (zerop i) (null list)))))
(sequence (= (length seq) n))))
-(declaim (inline ensure-list))
-(defun ensure-list (thing)
- (if (listp thing) thing (list thing)))
-
(declaim (inline memq))
(defun memq (item list)
(member item list :test #'eq))
More information about the slime-cvs
mailing list