[slime-cvs] CVS slime

[CVS User sboukarev]

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

Modified Files:
	ChangeLog swank-sbcl.lisp 
Log Message:
* swank-sbcl.lisp (background-save-image): add #-win32, because it
uses symbols not present on win32.
Reported by Holly Styles.


--- /project/slime/cvsroot/slime/ChangeLog	2010/08/31 23:44:40	1.2134
+++ /project/slime/cvsroot/slime/ChangeLog	2010/09/01 13:18:55	1.2135
@@ -1,3 +1,9 @@
+2010-09-01  Stas Boukarev  <stassats at gmail.com>
+
+	* swank-sbcl.lisp (background-save-image): add #-win32, because it
+	uses symbols not present on win32.
+	Reported by Holly Styles.
+
 2010-08-31  Stas Boukarev  <stassats at gmail.com>
 
 	* swank-cmucl.lisp (foreign-frame-p, gdb-exec, frame-ip): Sparc
--- /project/slime/cvsroot/slime/swank-sbcl.lisp	2010/08/31 10:33:15	1.276
+++ /project/slime/cvsroot/slime/swank-sbcl.lisp	2010/09/01 13:18:55	1.277
@@ -1630,8 +1630,9 @@
                          :dual-channel-p t                         
                          :external-format external-format))
 
-(defimplementation background-save-image  (filename &key restart-function
-                                              completion-function)
+#-win32
+(defimplementation background-save-image (filename &key restart-function
+                                                   completion-function)
   (flet ((restart-sbcl ()
            (sb-debug::enable-debugger)
            (setf sb-impl::*descriptor-handlers* nil)