guile/guile-core/libguile ChangeLog socket.c

[Gary Houston]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Gary Houston <address@hidden>   01/05/05 01:31:00

Modified files:
        guile-core/libguile: ChangeLog socket.c 

Log message:
        * socket.c: use HAVE_IPV6 instead of AF_INET6 to enable IPv6
        support.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/ChangeLog.diff?cvsroot=OldCVS&tr1=1.1375&tr2=1.1376&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/socket.c.diff?cvsroot=OldCVS&tr1=1.73&tr2=1.74&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/ChangeLog
diff -u guile/guile-core/libguile/ChangeLog:1.1375 
guile/guile-core/libguile/ChangeLog:1.1376
--- guile/guile-core/libguile/ChangeLog:1.1375  Fri May  4 14:54:00 2001
+++ guile/guile-core/libguile/ChangeLog Sat May  5 01:30:59 2001
@@ -1,3 +1,8 @@
+2001-05-05  Gary Houston  <address@hidden>
+
+       * socket.c: use HAVE_IPV6 instead of AF_INET6 to enable IPv6
+       support.
+
 2001-05-04  Neil Jerram  <address@hidden>
 
        * eval.c (scm_promise_p), list.c (scm_append_x, scm_reverse_x),
Index: guile/guile-core/libguile/socket.c
diff -u guile/guile-core/libguile/socket.c:1.73 
guile/guile-core/libguile/socket.c:1.74
--- guile/guile-core/libguile/socket.c:1.73     Thu May  3 16:42:31 2001
+++ guile/guile-core/libguile/socket.c  Sat May  5 01:31:00 2001
@@ -254,7 +254,7 @@
 #undef FUNC_NAME
 #endif
 
-#ifdef AF_INET6
+#ifdef HAVE_IPV6
 
 /* flip a 128 bit IPv6 address between host and network order.  */
 #ifdef WORDS_BIGENDIAN
@@ -419,7 +419,7 @@
 #undef FUNC_NAME
 #endif
 
-#endif  /* AF_INET6 */
+#endif  /* HAVE_IPV6 */
 
 SCM_SYMBOL (sym_socket, "socket");
 
@@ -713,7 +713,7 @@
        *size = sizeof (struct sockaddr_in);
        return (struct sockaddr *) soka;
       }
-#ifdef AF_INET6
+#ifdef HAVE_IPV6
     case AF_INET6:
       {
        /* see RFC2553.  */
@@ -933,7 +933,7 @@
        ve[2] = scm_ulong2num ((unsigned long) ntohs (nad->sin_port));
       }
       break;
-#ifdef AF_INET6
+#ifdef HAVE_IPV6
     case AF_INET6:
       {
        const struct sockaddr_in6 *nad = (struct sockaddr_in6 *) address;
@@ -982,7 +982,7 @@
 #define MAX_SIZE_UN 0
 #endif
 
-#if defined (AF_INET6)
+#if defined (HAVE_IPV6)
 #define MAX_SIZE_IN6 sizeof (struct sockaddr_in6)
 #else
 #define MAX_SIZE_IN6 0