summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixThrd.c
diff options
context:
space:
mode:
authordas <das>2006-12-19 04:14:10 (GMT)
committerdas <das>2006-12-19 04:14:10 (GMT)
commitbe7ae19a2c320ef01320656e02ddd1ae8c218830 (patch)
treeb265c8e1d0348b824f1309c11b03e12438bbe229 /unix/tclUnixThrd.c
parent5f6537a4a1f5b4f480c7027c93dd6de023a54730 (diff)
downloadtcl-be7ae19a2c320ef01320656e02ddd1ae8c218830.zip
tcl-be7ae19a2c320ef01320656e02ddd1ae8c218830.tar.gz
tcl-be7ae19a2c320ef01320656e02ddd1ae8c218830.tar.bz2
* unix/tclUnixThrd.c (TclpInetNtoa): fix for 64 bit.
Diffstat (limited to 'unix/tclUnixThrd.c')
-rw-r--r--unix/tclUnixThrd.c8
1 files changed, 2 insertions, 6 deletions
diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c
index 30b1fc6..073e44c 100644
--- a/unix/tclUnixThrd.c
+++ b/unix/tclUnixThrd.c
@@ -832,13 +832,9 @@ TclpInetNtoa(struct in_addr addr)
{
#ifdef TCL_THREADS
ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey);
- union {
- unsigned long l;
- unsigned char b[4];
- } u;
+ char *b = (char*) &addr.s_addr;
- u.l = (unsigned long) addr.s_addr;
- sprintf(tsdPtr->nabuf, "%u.%u.%u.%u", u.b[0], u.b[1], u.b[2], u.b[3]);
+ sprintf(tsdPtr->nabuf, "%u.%u.%u.%u", b[0], b[1], b[2], b[3]);
return tsdPtr->nabuf;
#else
return inet_ntoa(addr);