diff options
author | dgp <dgp@users.sourceforge.net> | 2006-12-01 15:55:43 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2006-12-01 15:55:43 (GMT) |
commit | 986958b3d40c8667b6f7232cd0d7d7c6987014a6 (patch) | |
tree | e4a04cf8dde40fdd70f655a5519108dcd36b9f83 /generic/tclInt.h | |
parent | 84e12e85c42e0e68ff5aa6b331aa0d53962f7c5a (diff) | |
download | tcl-986958b3d40c8667b6f7232cd0d7d7c6987014a6.zip tcl-986958b3d40c8667b6f7232cd0d7d7c6987014a6.tar.gz tcl-986958b3d40c8667b6f7232cd0d7d7c6987014a6.tar.bz2 |
TIP#287 IMPLEMENTATION
* doc/chan.n: New subcommand [chan pending].
* generic/tclBasic.c: Thanks to Michael Cleverly for proposal
* generic/tclInt.h: and implementation.
* generic/tclIOCmd.c:
* library/init.tcl:
* tests/chan.test:
* tests/ioCmd.test:
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 0fb2ebf..e28e849 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -12,7 +12,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.299 2006/11/28 22:20:29 andreas_kupries Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.300 2006/12/01 15:55:45 dgp Exp $ */ #ifndef _TCLINT @@ -2465,6 +2465,9 @@ MODULE_SCOPE int Tcl_CatchObjCmd(ClientData clientData, MODULE_SCOPE int Tcl_CdObjCmd(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]); +MODULE_SCOPE int TclChanPendingObjCmd( + ClientData clientData, Tcl_Interp *interp, + int objc, Tcl_Obj *CONST objv[]); /* TIP 287 */ MODULE_SCOPE int TclChanTruncateObjCmd( ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]); |