diff options
author | andreas_kupries <andreas_kupries@noemail.net> | 2005-08-24 17:56:23 (GMT) |
---|---|---|
committer | andreas_kupries <andreas_kupries@noemail.net> | 2005-08-24 17:56:23 (GMT) |
commit | fe7af5fe90dd76c2992073cd362a267116a8737c (patch) | |
tree | 20a737ae03097f905f0e9230c85c04123e5b5894 /generic/tclIO.h | |
parent | e4f230e7ef076bd71ccac3bb1ba305da735491d0 (diff) | |
download | tcl-fe7af5fe90dd76c2992073cd362a267116a8737c.zip tcl-fe7af5fe90dd76c2992073cd362a267116a8737c.tar.gz tcl-fe7af5fe90dd76c2992073cd362a267116a8737c.tar.bz2 |
TIP#219 IMPLEMENTATION
* doc/SetChanErr.3: ** New File **. Documentation of the new
channel API functions.
* generic/tcl.decls: Stub declarations of the new channel API.
* generic/tclDecls.h: Regenerated
* generic/tclStubInit.c:
* tclIORChan.c: ** New File **. Implementation of the reflected
channel.
* generic/tclInt.h: Integration of reflected channel and new error
* generic/tclIO.c: propagation into the generic I/O core.
* generic/tclIOCmd.c:
* generic/tclIO.h:
* library/init.tcl:
* tests/io.test: Extended testsuite.
* tests/ioCmd.test:
* tests/chan.test:
* generic/tclTest.c:
* generic/tclThreadTest.c:
* unix/Makefile.in: Integration into the build machinery.
* win/Makefile.in:
* win/Makefile.vc:
FossilOrigin-Name: d936ddccf8636a3ce65f75ce4732b434bb0a4b73
Diffstat (limited to 'generic/tclIO.h')
-rw-r--r-- | generic/tclIO.h | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/generic/tclIO.h b/generic/tclIO.h index c0abec2..9ec4abc 100644 --- a/generic/tclIO.h +++ b/generic/tclIO.h @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIO.h,v 1.7 2004/07/15 20:46:49 andreas_kupries Exp $ + * RCS: @(#) $Id: tclIO.h,v 1.8 2005/08/24 17:56:23 andreas_kupries Exp $ */ /* @@ -235,6 +235,20 @@ typedef struct ChannelState { /* Next in list of channels currently open. */ Tcl_ThreadId managingThread; /* TIP #10: Id of the thread managing * this stack of channels. */ + + /* TIP #219 ... Info for the I/O system ... + * Error message set by channel drivers, for the propagation of + * arbitrary Tcl errors. This information, if present (chanMsg not + * NULL), takes precedence over a posix error code returned by a + * channel operation. + */ + + Tcl_Obj* chanMsg; + Tcl_Obj* unreportedMsg; /* Non-NULL if an error report was + * deferred because it happened in the + * background. The value is the + * chanMg, if any. #219's companion to + * 'unreportedError'. */ } ChannelState; /* |