diff options
| author | welch <welch> | 1999-07-02 19:51:29 (GMT) |
|---|---|---|
| committer | welch <welch> | 1999-07-02 19:51:29 (GMT) |
| commit | 2d937e100928216f6ee936df4596363301450fe2 (patch) | |
| tree | 6a074f5917a876bb3448145be44c032cb17bb78d /generic/tcl.decls | |
| parent | 66a17ecd6338f4871396c407f750c65400c8ad72 (diff) | |
| download | tcl-2d937e100928216f6ee936df4596363301450fe2.zip tcl-2d937e100928216f6ee936df4596363301450fe2.tar.gz tcl-2d937e100928216f6ee936df4596363301450fe2.tar.bz2 | |
Name change from Tcl_ReplaceChannel to Tcl_StackChannel
Added new code that modifies the channel in place.
Diffstat (limited to 'generic/tcl.decls')
| -rw-r--r-- | generic/tcl.decls | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index da93b29..354882e 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -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: tcl.decls,v 1.18 1999/06/30 17:47:27 welch Exp $ +# RCS: @(#) $Id: tcl.decls,v 1.19 1999/07/02 19:51:29 welch Exp $ library tcl @@ -982,17 +982,17 @@ declare 280 generic { # version into the new one). declare 281 generic { - Tcl_Channel Tcl_ReplaceChannel(Tcl_Interp *interp, \ + Tcl_Channel Tcl_StackChannel(Tcl_Interp *interp, \ Tcl_ChannelType *typePtr, ClientData instanceData, \ int mask, Tcl_Channel prevChan) } declare 282 generic { - void Tcl_UndoReplaceChannel(Tcl_Interp *interp, Tcl_Channel chan) + void Tcl_UnstackChannel(Tcl_Interp *interp, Tcl_Channel chan) +} +declare 283 generic { + void Tcl_GetStackedChannel(Tcl_Channel chan) } - # Reserved for future use (8.0.x vs. 8.1) -# declare 283 generic { -# } # declare 284 generic { # } # declare 285 generic { |