[Sbcl-commits] CVS: sbcl/contrib/sb-bsd-sockets constants.lisp, 1.15, 1.16 name-service.lisp, 1.14, 1.15

[Cyrus H. <sl...@us...>]

Update of /cvsroot/sbcl/sbcl/contrib/sb-bsd-sockets
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv10991/contrib/sb-bsd-sockets

Modified Files:
	constants.lisp name-service.lisp 
Log Message:
1.0.3.25: freebsd sb-bsd-sockets fixes
 * SO_NO_CHECK doesn't exist on freebsd. Make this #-freebsd.
 * EAI-ADDRFAMILY and EAI-NODATA are deprecated and don't exist on
   freebsd. Make these #-freebsd.


Index: constants.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/contrib/sb-bsd-sockets/constants.lisp,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -d -r1.15 -r1.16
--- constants.lisp	2 Mar 2007 00:59:11 -0000	1.15
+++ constants.lisp	3 Mar 2007 20:53:15 -0000	1.16
@@ -47,6 +47,7 @@
            "Send periodic keepalives: if peer does not respond, we get SIGPIPE")
  (:integer so-oobinline "SO_OOBINLINE"
            "Put out-of-band data into the normal input queue when received")
+ #-freebsd
  (:integer so-no-check "SO_NO_CHECK")
  #+linux (:integer so-priority "SO_PRIORITY")
  (:integer so-linger "SO_LINGER"
@@ -273,7 +274,9 @@
  (:integer EAI-BADFLAGS "EAI_BADFLAGS")
  (:integer EAI-NONAME "EAI_NONAME")
  (:integer EAI-SERVICE "EAI_SERVICE")
+ #-freebsd
  (:integer EAI-ADDRFAMILY "EAI_ADDRFAMILY")
+ #-freebsd
  (:integer EAI-NODATA "EAI_NODATA")
  (:integer EAI-MEMORY "EAI_MEMORY")
  (:integer EAI-FAIL "EAI_FAIL")

Index: name-service.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/contrib/sb-bsd-sockets/name-service.lisp,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- name-service.lisp	2 Mar 2007 00:59:11 -0000	1.14
+++ name-service.lisp	3 Mar 2007 20:53:15 -0000	1.15
@@ -222,7 +222,7 @@
     no-recovery-error)
 (define-name-service-condition
     sockint::NO-ADDRESS  ;; Also defined as NO-DATA, with the same value
-    sockint::EAI-NODATA
+    #-freebsd sockint::EAI-NODATA #+freebsd nil
     no-address-error)
 
 (defun condition-for-name-service-errno (err)