[slime-cvs] CVS slime

[CVS User trittweiler]

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

Modified Files:
	ChangeLog slime.el 
Log Message:
	* slime.el (compile-defun [test]): Add two cases.


--- /project/slime/cvsroot/slime/ChangeLog	2010/01/05 09:33:08	1.1958
+++ /project/slime/cvsroot/slime/ChangeLog	2010/01/05 21:17:52	1.1959
@@ -1,3 +1,7 @@
+2010-01-05  Tobias C. Rittweiler <tcr at freebits.de>
+
+	* slime.el (compile-defun [test]): Add two cases.
+
 2010-01-05  Cecil Westerhof  <Cecil at decebal.nl>
 
 	* slime.texi (inferior-slime-mode): Fix thinko.
--- /project/slime/cvsroot/slime/slime.el	2010/01/05 09:00:15	1.1263
+++ /project/slime/cvsroot/slime/slime.el	2010/01/05 21:17:52	1.1264
@@ -7720,7 +7720,9 @@
       ("(defun foo () pkg-does-not-exist:symbol)" 
        pkg-does-not-exist:symbol)
       ("(defun foo () swank:symbol-does-not-exist)"
-       swank:symbol-does-not-exist))
+       swank:symbol-does-not-exist)
+      ("(defun foo (x) ,x)" \,x)
+      ("(defun foo () #@foo)" @foo))
   (slime-check-top-level)    
   (with-temp-buffer
     (lisp-mode)