[slime-cvs] CVS slime

[CVS User heller]

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

Modified Files:
	swank-backend.lisp 
Log Message:
(frame-catch-tags): Add ignore decl.

--- /project/slime/cvsroot/slime/swank-backend.lisp	2008/10/19 20:03:34	1.159
+++ /project/slime/cvsroot/slime/swank-backend.lisp	2008/10/19 20:03:39	1.160
@@ -671,6 +671,7 @@
 (definterface frame-catch-tags (frame-number)
   "Return a list of catch tags for being printed in a debugger stack
 frame."
+  (declare (ignore frame-number))
   '())
 
 (definterface frame-locals (frame-number)