blob: 1fc68827474b1d13c79f2288e882a18d8482303f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
--- tclUnixSock.c.orig Fri Apr 16 02:48:05 1999
+++ tclUnixSock.c Wed Nov 14 23:21:18 2001
@@ -65,7 +65,7 @@
char *
Tcl_GetHostName()
{
-#ifndef NO_UNAME
+#if 0
struct utsname u;
struct hostent *hp;
#else
@@ -80,7 +80,7 @@
}
native = NULL;
-#ifndef NO_UNAME
+#if 0
(VOID *) memset((VOID *) &u, (int) 0, sizeof(struct utsname));
if (uname(&u) > -1) { /* INTL: Native. */
hp = gethostbyname(u.nodename); /* INTL: Native. */
|