diff options
author | das <das> | 2006-12-19 04:14:10 (GMT) |
---|---|---|
committer | das <das> | 2006-12-19 04:14:10 (GMT) |
commit | 3c60454ae469a15e25b9ce266ecb899d890c3df0 (patch) | |
tree | b265c8e1d0348b824f1309c11b03e12438bbe229 /unix/tclUnixThrd.c | |
parent | 248bded86abd421ead9928de934d19ea197a56a9 (diff) | |
download | tcl-3c60454ae469a15e25b9ce266ecb899d890c3df0.zip tcl-3c60454ae469a15e25b9ce266ecb899d890c3df0.tar.gz tcl-3c60454ae469a15e25b9ce266ecb899d890c3df0.tar.bz2 |
* unix/tclUnixThrd.c (TclpInetNtoa): fix for 64 bit.
Diffstat (limited to 'unix/tclUnixThrd.c')
-rw-r--r-- | unix/tclUnixThrd.c | 8 |
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); |