0.9.1.12:

	Merge "Add socket-not-connected-error to sb-bsd-sockets" (Tony
	Martinez sbcl-devel 2004-11-06)
	... NOT-CONNECTED-ERROR seems to match the naming scheme better
		than SOCKET-NOT-CONNECTED-ERROR.

diff --git a/contrib/sb-bsd-sockets/constants.lisp b/contrib/sb-bsd-sockets/constants.lisp
index ab29f66..7e331c6 100644 (file)
--- a/contrib/sb-bsd-sockets/constants.lisp
+++ b/contrib/sb-bsd-sockets/constants.lisp
@@ -75,6 +75,7 @@
  (:integer EPROTONOSUPPORT "EPROTONOSUPPORT")
  (:integer ESOCKTNOSUPPORT "ESOCKTNOSUPPORT")
  (:integer ENETUNREACH "ENETUNREACH")
+ (:integer ENOTCONN "ENOTCONN")
 
  (:integer NETDB-INTERNAL "NETDB_INTERNAL" "See errno.")
  (:integer NETDB-SUCCESS "NETDB_SUCCESS" "No problem.")

diff --git a/contrib/sb-bsd-sockets/sockets.lisp b/contrib/sb-bsd-sockets/sockets.lisp
index 0fb00e5..efbd0e4 100644 (file)
--- a/contrib/sb-bsd-sockets/sockets.lisp
+++ b/contrib/sb-bsd-sockets/sockets.lisp
@@ -325,7 +325,7 @@ SB-SYS:MAKE-FD-STREAM."))
 (define-socket-condition sockint::EPROTONOSUPPORT protocol-not-supported-error)
 (define-socket-condition sockint::ESOCKTNOSUPPORT socket-type-not-supported-error)
 (define-socket-condition sockint::ENETUNREACH network-unreachable-error)
-
+(define-socket-condition sockint::ENOTCONN not-connected-error)
 
 (defun condition-for-errno (err)
   (or (cdr (assoc err *conditions-for-errno* :test #'eql)) 'socket-error))

diff --git a/version.lisp-expr b/version.lisp-expr
index f79ef1c..a0705a3 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.9.1.11"
+"0.9.1.12"