[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