summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixSock.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-08-25 13:46:25 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-08-25 13:46:25 (GMT)
commitbeea0edb4db4751be42b6fbfb15df659cf6d0811 (patch)
tree5170c634166badec669e789ebd2b48f705ee443f /unix/tclUnixSock.c
parentc2902c7efda7db40404c0773b45dd56c7c653442 (diff)
parent1dac20d62e354430a8f82e46bf0805c70cdde4e3 (diff)
downloadtcl-beea0edb4db4751be42b6fbfb15df659cf6d0811.zip
tcl-beea0edb4db4751be42b6fbfb15df659cf6d0811.tar.gz
tcl-beea0edb4db4751be42b6fbfb15df659cf6d0811.tar.bz2
Merge trunk
Diffstat (limited to 'unix/tclUnixSock.c')
-rw-r--r--unix/tclUnixSock.c12
1 files changed, 8 insertions, 4 deletions
diff --git a/unix/tclUnixSock.c b/unix/tclUnixSock.c
index 2353f94..45abc01 100644
--- a/unix/tclUnixSock.c
+++ b/unix/tclUnixSock.c
@@ -646,7 +646,7 @@ TcpCloseProc(
while (fds != NULL) {
TcpFdList *next = fds->next;
- ckfree(fds);
+ ckfree(fds);
fds = next;
}
if (statePtr->addrlist != NULL) {
@@ -730,6 +730,10 @@ TcpClose2Proc(
*/
#ifndef NEED_FAKE_RFC2553
+#if defined (__clang__) || ((__GNUC__) && ((__GNUC__ > 4) || ((__GNUC__ == 4) && (__GNUC_MINOR__ > 5))))
+#pragma GCC diagnostic push
+#pragma GCC diagnostic ignored "-Wstrict-aliasing"
+#endif
static inline int
IPv6AddressNeedsNumericRendering(
struct in6_addr addr)
@@ -743,16 +747,16 @@ IPv6AddressNeedsNumericRendering(
* at least some versions of OSX.
*/
-#pragma GCC diagnostic push
-#pragma GCC diagnostic ignored "-Wstrict-aliasing"
if (!IN6_IS_ADDR_V4MAPPED(&addr)) {
-#pragma GCC diagnostic pop
return 0;
}
return (addr.s6_addr[12] == 0 && addr.s6_addr[13] == 0
&& addr.s6_addr[14] == 0 && addr.s6_addr[15] == 0);
}
+#if defined (__clang__) || ((__GNUC__) && ((__GNUC__ > 4) || ((__GNUC__ == 4) && (__GNUC_MINOR__ > 5))))
+#pragma GCC diagnostic pop
+#endif
#endif /* NEED_FAKE_RFC2553 */
static void