From 30f2e295b63a1fec6ea5c66dba9e45e060e5fef1 Mon Sep 17 00:00:00 2001
From: rfm <rfm@72102866-910b-0410-8b05-ffd578937521>
Date: Mon, 7 Jan 2008 18:33:09 +0000
Subject: [PATCH] Fixup address length info

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@25889 72102866-910b-0410-8b05-ffd578937521
---
 Source/GSNetwork.h | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/Source/GSNetwork.h b/Source/GSNetwork.h
index fe1c1e058..e2f2cf73c 100644
--- a/Source/GSNetwork.h
+++ b/Source/GSNetwork.h
@@ -71,7 +71,12 @@
 #endif
 
 #define SOCKET  int     /* Socket type  */
-#define SOCKLEN(X)    (X->sa_len)
+#ifdef	AF_INET6
+#define SOCKLEN(X)    ((X->sa_family == AF_INET) ? sizeof(struct sockaddr_in) : sizeof(struct sockaddr_in6))
+#else
+#define SOCKLEN(X)    sizeof(struct sockaddr_in)
+#endif
+/* #define SOCKLEN(X)    (X->sa_len) */
 #define BADSOCKET(X)    ((X) < 0)
 #define GSNETERROR      errno
 #define GSWOULDBLOCK    (errno == EINPROGRESS)