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.9 2004/04/06 22:25:57 dgp Exp $
*/
#include "tclInt.h"
/*
* There is no portable macro for the maximum length
* of host names returned by gethostbyname(). We should only
|
|
|
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.9.2.1 2005/02/02 15:54:02 kennykb Exp $
*/
#include "tclInt.h"
/*
* There is no portable macro for the maximum length
* of host names returned by gethostbyname(). We should only
|
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
|
*/
int
TclpHasSockets(interp)
Tcl_Interp *interp; /* Not used. */
{
return TCL_OK;
}
/*
*----------------------------------------------------------------------
*
* TclpCutSockChannel --
*
* Remove any thread local refs to this channel. See
* Tcl_CutChannel for more info. Dummy definition.
*
* Results:
* None.
*
* Side effects:
* None.
*
*----------------------------------------------------------------------
*/
void
TclpCutSockChannel(chan)
Tcl_Channel chan;
{
}
/*
*----------------------------------------------------------------------
*
* TclpSpliceSockChannel --
*
* Insert thread local ref for this channel.
* Tcl_SpliceChannel for more info. Dummy definition.
*
* Results:
* None.
*
* Side effects:
* None.
*
*----------------------------------------------------------------------
*/
void
TclpSpliceSockChannel(chan)
Tcl_Channel chan;
{
}
|
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
<
|
142
143
144
145
146
147
148
149
|
*/
int
TclpHasSockets(interp)
Tcl_Interp *interp; /* Not used. */
{
return TCL_OK;
}
|