[slime-cvs] CVS slime
CVS User trittweiler
trittweiler at common-lisp.net
Wed Jan 6 14:13:49 UTC 2010
Update of /project/slime/cvsroot/slime
In directory cl-net:/tmp/cvs-serv16658
Modified Files:
swank-backend.lisp ChangeLog
Log Message:
* swank-backend (declaration-arglist): Normalize declaration
specifiers to contain `variables' rather than `vars'.
* swank-arglists.lisp (arglist-dispatch ['declare]): Normalize
`vars' to `variables'.
(arglist-for-type-declaration): Ditto.
* slime-autodoc (autodoc.1 [test]): Reorganize test, add comments,
add cases to test declarations.
--- /project/slime/cvsroot/slime/swank-backend.lisp 2010/01/05 09:00:39 1.190
+++ /project/slime/cvsroot/slime/swank-backend.lisp 2010/01/06 14:13:48 1.191
@@ -542,10 +542,10 @@
additional information on the specifiers defined in ANSI Common Lisp.")
(:method (decl-identifier)
(case decl-identifier
- (dynamic-extent '(&rest vars))
- (ignore '(&rest vars))
- (ignorable '(&rest vars))
- (special '(&rest vars))
+ (dynamic-extent '(&rest variables))
+ (ignore '(&rest variables))
+ (ignorable '(&rest variables))
+ (special '(&rest variables))
(inline '(&rest function-names))
(notinline '(&rest function-names))
(declaration '(&rest names))
@@ -555,9 +555,9 @@
(otherwise
(flet ((typespec-p (symbol) (member :type (describe-symbol-for-emacs symbol))))
(cond ((and (symbolp decl-identifier) (typespec-p decl-identifier))
- '(&rest vars))
+ '(&rest variables))
((and (listp decl-identifier) (typespec-p (first decl-identifier)))
- '(&rest vars))
+ '(&rest variables))
(t :not-available)))))))
(defgeneric type-specifier-arglist (typespec-operator)
--- /project/slime/cvsroot/slime/ChangeLog 2010/01/05 21:20:38 1.1960
+++ /project/slime/cvsroot/slime/ChangeLog 2010/01/06 14:13:48 1.1961
@@ -1,3 +1,8 @@
+2010-01-06 Tobias C. Rittweiler <tcr at freebits.de>
+
+ * swank-backend (declaration-arglist): Normalize declaration
+ specifiers to contain `variables' rather than `vars'.
+
2010-01-05 Tobias C. Rittweiler <tcr at freebits.de>
* swank-sbcl.lisp (compiler-note-location): Add missing return-from.
More information about the slime-cvs
mailing list