[slime-cvs] CVS slime

heller heller at common-lisp.net
Sun Aug 17 08:31:26 UTC 2008


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

Modified Files:
	ChangeLog swank-cmucl.lisp 
Log Message:
* swank-cmucl.lisp (waitpid): Don't use unix::pid-t, it's only
defined for Linux.

--- /project/slime/cvsroot/slime/ChangeLog	2008/08/17 08:31:22	1.1458
+++ /project/slime/cvsroot/slime/ChangeLog	2008/08/17 08:31:26	1.1459
@@ -1,7 +1,10 @@
 2008-08-17  Helmut Eller  <heller at common-lisp.net>
 
-       * swank-sbcl.lisp (sb-thread::get-foreground): Don't override.
-       Let SBCL people fix this.
+	* swank-cmucl.lisp (waitpid): Don't use unix::pid-t, it's only
+	defined for Linux.
+
+	* swank-sbcl.lisp (sb-thread::get-foreground): Don't override.
+	Let SBCL people fix this.
 
 2008-08-17  B.Scott Michel <scooter.phd at gmail.com>
 
--- /project/slime/cvsroot/slime/swank-cmucl.lisp	2008/08/12 17:54:44	1.187
+++ /project/slime/cvsroot/slime/swank-cmucl.lisp	2008/08/17 08:31:26	1.188
@@ -2288,8 +2288,7 @@
   (alien:with-alien ((status c-call:int))
     (let ((code (alien:alien-funcall 
                  (alien:extern-alien 
-                  waitpid (alien:function unix::pid-t 
-                                          unix::pid-t
+                  waitpid (alien:function c-call:int c-call:int
                                           (* c-call:int) c-call:int))
                  pid (alien:addr status) 0)))
       (cond ((= code -1) (error "waitpid: ~A" (unix:get-unix-error-msg)))




More information about the slime-cvs mailing list