diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-10-12 16:58:20 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-10-12 16:58:20 (GMT) |
| commit | aec96db0167170b47c7f0dd132fd530354aa4ac7 (patch) | |
| tree | 6dafdae1b5c059988993ad0f0241248ae40db41d /unix/tclUnixSock.c | |
| parent | e97fab49d3893f5cc7879b765cc345bf32349096 (diff) | |
| download | tcl-aec96db0167170b47c7f0dd132fd530354aa4ac7.zip tcl-aec96db0167170b47c7f0dd132fd530354aa4ac7.tar.gz tcl-aec96db0167170b47c7f0dd132fd530354aa4ac7.tar.bz2 | |
Reduce direct use of the tclEmptyStringRep.
Diffstat (limited to 'unix/tclUnixSock.c')
| -rw-r--r-- | unix/tclUnixSock.c | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/unix/tclUnixSock.c b/unix/tclUnixSock.c index 5d11a28..44825fc 100644 --- a/unix/tclUnixSock.c +++ b/unix/tclUnixSock.c @@ -239,9 +239,6 @@ InitializeHostName( native = u.nodename; } } - if (native == NULL) { - native = tclEmptyStringRep; - } #else /* !NO_UNAME */ /* * Uname doesn't exist; try gethostname instead. @@ -270,9 +267,15 @@ InitializeHostName( #endif /* NO_UNAME */ *encodingPtr = Tcl_GetEncoding(NULL, NULL); - *lengthPtr = strlen(native); - *valuePtr = ckalloc((*lengthPtr) + 1); - memcpy(*valuePtr, native, (size_t)(*lengthPtr)+1); + if (native) { + *lengthPtr = strlen(native); + *valuePtr = ckalloc((*lengthPtr) + 1); + memcpy(*valuePtr, native, (size_t)(*lengthPtr)+1); + } else { + *lengthPtr = 0; + *valuePtr = ckalloc(1); + *valuePtr[0] = '\0'; + } } /* |