diff options
Diffstat (limited to 'generic/tclInt.decls')
| -rw-r--r-- | generic/tclInt.decls | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index 2b6860f..97e8da8 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -51,11 +51,10 @@ declare 6 { declare 7 { int TclCopyAndCollapse(int count, const char *src, char *dst) } -# Removed in Tcl 9 -#declare 8 { -# int TclCopyChannelOld(Tcl_Interp *interp, Tcl_Channel inChan, -# Tcl_Channel outChan, int toRead, Tcl_Obj *cmdPtr) -#} +declare 8 { + int TclCopyChannel(Tcl_Interp *interp, Tcl_Channel inChan, + Tcl_Channel outChan, int toRead, Tcl_Obj *cmdPtr) +} # TclCreatePipeline unofficially exported for use by BLT. @@ -995,8 +994,9 @@ declare 247 { void TclResetRewriteEnsemble(Tcl_Interp *interp, int isRootEnsemble) } +# Kept on Tcl9, for binary compatibility with Tcl8 declare 248 { - int TclCopyChannel(Tcl_Interp *interp, Tcl_Channel inChan, + int TclCopyChannelOld(Tcl_Interp *interp, Tcl_Channel inChan, Tcl_Channel outChan, Tcl_WideInt toRead, Tcl_Obj *cmdPtr) } |