[slime-cvs] CVS slime/contrib

[mbaringer]

Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv11290/contrib

Modified Files:
	swank-presentation-streams.lisp ChangeLog 
Log Message:



--- /project/slime/cvsroot/slime/contrib/swank-presentation-streams.lisp	2007/08/28 16:26:32	1.4
+++ /project/slime/cvsroot/slime/contrib/swank-presentation-streams.lisp	2008/02/04 18:00:36	1.5
@@ -210,6 +210,9 @@
 (defun presenting-object-1 (object stream continue)
   "Uses the bridge mechanism with two messages >id and <id. The first one
 says that I am starting to print an object with this id. The second says I am finished"
+  ;; this declare special is to let the compiler know that *record-repl-results* will eventually be
+  ;; a global special, even if it isn't when this file is compiled/loaded.
+  (declare (special *record-repl-results*))
   (let ((slime-stream-p 
 	 (and *record-repl-results* (slime-stream-p stream))))
     (if slime-stream-p
--- /project/slime/cvsroot/slime/contrib/ChangeLog	2008/02/04 17:58:32	1.86
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2008/02/04 18:00:36	1.87
@@ -1,5 +1,9 @@
 2008-02-04  Marco Baringer  <mb at bese.it>
 
+	* swank-presentation-streams.lisp (presenting-object-1): Add
+	declare special *record-repl-results* to silence compiler
+	warnings.
+
 	* swank-arglists.lisp (arglist-dispatch): Specialize operator-type
 	so openmcl doesn't warn about unused arguments.
 	(arglist-dispatch): add declare ignore form.