Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | lint |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | core-8-1-branch-old |
| Files: | files | file ages | folders |
| SHA1: |
d3a21d1def49ec37661de225cef54bea |
| User & Date: | stanton 1999-03-25 23:27:49.000 |
Context
|
1999-03-25
| ||
| 23:28 | * generic/tclPkg.c (Tcl_PkgRequireEx): Fixed broken clientData initialization in package code. check-in: dab64840b0 user: stanton tags: core-8-1-branch-old | |
| 23:27 | lint check-in: d3a21d1def user: stanton tags: core-8-1-branch-old | |
| 22:44 | Fixed quoting typo on LD_SEARCH_FLAGS definition for Linux check-in: 17c61a9303 user: welch tags: core-8-1-branch-old | |
Changes
Changes to unix/tclUnixSock.c.
1 2 3 4 5 6 7 8 9 10 | /* * tclUnixSock.c -- * * This file contains Unix-specific socket related code. * * Copyright (c) 1995 Sun Microsystems, Inc. * * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * | | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | /* * tclUnixSock.c -- * * This file contains Unix-specific socket related code. * * Copyright (c) 1995 Sun Microsystems, Inc. * * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * * RCS: @(#) $Id: tclUnixSock.c,v 1.1.2.7 1999/03/25 23:27:49 stanton Exp $ */ #include "tcl.h" #include "tclPort.h" /* * There is no portable macro for the maximum length |
| ︙ | ︙ | |||
67 68 69 70 71 72 73 |
{
#ifndef NO_UNAME
struct utsname u;
struct hostent *hp;
#else
char buffer[sizeof(hostname)];
#endif
| | | 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 |
{
#ifndef NO_UNAME
struct utsname u;
struct hostent *hp;
#else
char buffer[sizeof(hostname)];
#endif
CONST char *native;
Tcl_MutexLock(&hostMutex);
if (hostnameInited) {
Tcl_MutexUnlock(&hostMutex);
return hostname;
}
|
| ︙ | ︙ |