aboutsummaryrefslogtreecommitdiffstats
path: root/lang/tcl83/files/patch-tclUnixSock.c
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. */