diff options
author | andreas_kupries <andreas_kupries@noemail.net> | 2003-04-22 23:20:39 (GMT) |
---|---|---|
committer | andreas_kupries <andreas_kupries@noemail.net> | 2003-04-22 23:20:39 (GMT) |
commit | aa905507a335cd8f795473255881d3610abc7df0 (patch) | |
tree | da7afb848b9cd285191c219ffb2b279fe3ee2429 /unix | |
parent | fa323e3030a4e522fa8363be34a0af91be6375ce (diff) | |
download | tcl-aa905507a335cd8f795473255881d3610abc7df0.zip tcl-aa905507a335cd8f795473255881d3610abc7df0.tar.gz tcl-aa905507a335cd8f795473255881d3610abc7df0.tar.bz2 |
* The changes below fix SF bugs [593810], and [718045].
* generic/tclIO.c (Tcl_CutChannel, Tcl_SpliceChannel):
Invoke TclpCutSockChannel and TclpSpliceSockChannel.
* generic/tclInt.h: Declare TclpCutSockChannel and
TclpSpliceSockChannel.
* unix/tclUnixSock.c (TclpCutSockChannel, TclpSpliceSockChannel):
Dummy functions, on unix the sockets are _not_ handled
specially.
* mac/tclMacSock.c (TclpCutSockChannel, TclpSpliceSockChannel):
* win/tclWinSock.c (TclpCutSockChannel, TclpSpliceSockChannel):
New functions to handle socket specific cut/splice operations:
auto-initi of socket system for thread on splice, management of
the module internal per-thread list of sockets, management of
association of sockets with HWNDs for event notification.
* win/tclWinSock.c (NewSocketInfo): Extended initialization
assignments to cover all items of the structure. During
debugging of the new code mentioned above I found that two
fileds could contain bogus data.
* win/tclWinFile.c: Added #undef HAVE_NO_FINDEX_ENUMS before
definition because when compiling in debug mode the compiler
complains about a redefinition, and this warning is also treated
as an error.
FossilOrigin-Name: 1aff0f8acbbcab828d9c26c2f4234c3f0da301fd
Diffstat (limited to 'unix')
-rw-r--r-- | unix/tclUnixSock.c | 48 |
1 files changed, 47 insertions, 1 deletions
diff --git a/unix/tclUnixSock.c b/unix/tclUnixSock.c index 8e5e3b7..91b8096 100644 --- a/unix/tclUnixSock.c +++ b/unix/tclUnixSock.c @@ -8,7 +8,7 @@ * 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.6 2002/02/27 01:16:43 hobbs Exp $ + * RCS: @(#) $Id: tclUnixSock.c,v 1.7 2003/04/22 23:20:43 andreas_kupries Exp $ */ #include "tcl.h" @@ -148,3 +148,49 @@ TclpHasSockets(interp) { 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; +{ +} |