diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-04-12 16:27:48 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-04-12 16:27:48 +0000 |
commit | 1ba8c23acab13fcfa090b39a9ecfe9b0c48bc867 (patch) | |
tree | 7a4e4b928d0820746d390c67d6ccd15e58caa79e /libguile/socket.c | |
parent | 6f3067f1e000bbd0a5546659b5693a59125f3568 (diff) | |
download | guile-1ba8c23acab13fcfa090b39a9ecfe9b0c48bc867.tar.gz |
* socket.c: Check for HAVE_UNIX_DOMAIN_SOCKETS instead of
UNIX_DOMAIN_SOCKETS. (Thanks to Lauri Alanko.)
Diffstat (limited to 'libguile/socket.c')
-rw-r--r-- | libguile/socket.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/socket.c b/libguile/socket.c index acb2aefc5..d1f59c122 100644 --- a/libguile/socket.c +++ b/libguile/socket.c @@ -57,7 +57,7 @@ #endif #include <sys/types.h> #include <sys/socket.h> -#ifdef UNIX_DOMAIN_SOCKETS +#ifdef HAVE_UNIX_DOMAIN_SOCKETS #include <sys/un.h> #endif #include <netinet/in.h> @@ -355,7 +355,7 @@ scm_fill_sockaddr (fam, address, args, which_arg, proc, size) *size = sizeof (struct sockaddr_in); return (struct sockaddr *) soka; } -#ifdef UNIX_DOMAIN_SOCKETS +#ifdef HAVE_UNIX_DOMAIN_SOCKETS case AF_UNIX: { struct sockaddr_un *soka; @@ -458,7 +458,7 @@ scm_addr_vector (address, proc) short int fam = address->sa_family; SCM result; SCM *ve; -#ifdef UNIX_DOMAIN_SOCKETS +#ifdef HAVE_UNIX_DOMAIN_SOCKETS if (fam == AF_UNIX) { struct sockaddr_un *nad = (struct sockaddr_un *) address; @@ -496,7 +496,7 @@ static void scm_init_addr_buffer () { scm_addr_buffer_size = -#ifdef UNIX_DOMAIN_SOCKETS +#ifdef HAVE_UNIX_DOMAIN_SOCKETS (int) sizeof (struct sockaddr_un) #else 0 |