Re: [slime-devel] Modification to swank-lispworks.lisp for LW Personal on Mac OS X
On Sun, 19 Dec 2004 20:26:05 -0700, Bill_Clementson@peoplesoft.com said:
Bill> I've just posted about setting up Emacs/SLIME with LW Personal on Mac OS X Bill> on my blog. There was one minor change needed to "swank-lispworks.lisp" in Bill> order to get it to work with LW Personal on Mac OS X. Here's the change Bill> (sorry it's not a patch but I'm on a different machine at the moment):
Bill> (defimplementation create-socket (host port) Bill> (multiple-value-bind (socket where errno) Bill> #+(and (not lispworks4.1) (not lispworks-personal-edition) (not Bill> macosx)) Bill> (comm::create-tcp-socket-for-service port :address host) Bill> #+lispworks4.1(comm::create-tcp-socket-for-service port) Bill> #+(and macosx Bill> lispworks-personal-edition)(comm::create-tcp-socket-for-service
martin@xanalys.com writes: port)
Hi there,
Is this to fix the "Can't assign requested address" error? That was
caused by
a bug in LWM 4.3, so I think the following would be better:
(defimplementation create-socket (host port) (multiple-value-bind (socket where errno) #-(or lispworks4.1 (and macosx lispworks4.3)) (comm::create-tcp-socket-for-service port :address host) #+(or lispworks4.1 (and macosx lispworks4.3)) (comm::create-tcp-socket-for-service port)
That works for me! Could one of the SLIME maintainers check Martin's changes into CVS please. Thanks, Bill
On Mon, 20 Dec 2004 19:42:57 -0700, Bill_Clementson@peoplesoft.com said:
Bill> martin@xanalys.com writes:
> On Sun, 19 Dec 2004 20:26:05 -0700, Bill_Clementson@peoplesoft.com Bill> said:
Bill> I've just posted about setting up Emacs/SLIME with LW Personal on Bill> Mac OS X Bill> on my blog. There was one minor change needed to Bill> "swank-lispworks.lisp" in Bill> order to get it to work with LW Personal on Mac OS X. Here's the Bill> change Bill> (sorry it's not a patch but I'm on a different machine at the Bill> moment):
Bill> (defimplementation create-socket (host port) Bill> (multiple-value-bind (socket where errno) Bill> #+(and (not lispworks4.1) (not lispworks-personal-edition) Bill> (not Bill> macosx)) Bill> (comm::create-tcp-socket-for-service port :address host) Bill> #+lispworks4.1(comm::create-tcp-socket-for-service port) Bill> #+(and macosx Bill> lispworks-personal-edition)(comm::create-tcp-socket-for-service Bill> port)
Hi there,
Is this to fix the "Can't assign requested address" error? That was
Bill> caused by
a bug in LWM 4.3, so I think the following would be better:
(defimplementation create-socket (host port) (multiple-value-bind (socket where errno) #-(or lispworks4.1 (and macosx lispworks4.3)) (comm::create-tcp-socket-for-service port :address host) #+(or lispworks4.1 (and macosx lispworks4.3)) (comm::create-tcp-socket-for-service port)
Bill> That works for me! Could one of the SLIME maintainers check Martin's Bill> changes into CVS please. Thanks for checking. I've commited the changes now. __Martin
participants (2)
-
Bill_Clementson＠peoplesoft.com -
martin＠xanalys.com