diff --git a/contrib/sockets/sockets.lisp b/contrib/sockets/sockets.lisp index 60f44bb77d86329a0aab4a09dde820ab8667190f..609d0451c388da16577106e45ab17add41605e0c 100755 --- a/contrib/sockets/sockets.lisp +++ b/contrib/sockets/sockets.lisp @@ -1429,6 +1429,15 @@ ecl_make_stream_from_fd(#0,#1,(enum ecl_smmode)#2, "#define NETDB_INTERNAL WSAEAFNOSUPPORT" "#define NETDB_SUCCESS 0" ) + +(Clines + "#ifndef NETDB_INTERNAL" + "#define NETDB_INTERNAL 0" + "#endif" + "#ifndef NETDB_SUCCESS" + "#define NETDB_SUCCESS 0" + "#endif") + (define-socket-condition EADDRINUSE address-in-use-error) (define-socket-condition EAGAIN interrupted-error) (define-socket-condition EBADF bad-file-descriptor-error)