diff options
author | dgp <dgp@users.sourceforge.net> | 2014-07-30 00:22:33 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2014-07-30 00:22:33 (GMT) |
commit | 2e1ca1d9e14de68527cb660bb11fb459fdb8f01e (patch) | |
tree | d2dc37bdf103c9c34253a78fb34ee5b67760bbf0 /generic/tclInt.h | |
parent | 397413cd716cc73ca6291b8ba67c1c1950624fd2 (diff) | |
download | tcl-2e1ca1d9e14de68527cb660bb11fb459fdb8f01e.zip tcl-2e1ca1d9e14de68527cb660bb11fb459fdb8f01e.tar.gz tcl-2e1ca1d9e14de68527cb660bb11fb459fdb8f01e.tar.bz2 |
Reduce the cost of Preserve/Release on channels
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 9a2e8dd..1bb2103 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2864,6 +2864,8 @@ MODULE_SCOPE int TclByteArrayMatch(const unsigned char *string, int strLen, const unsigned char *pattern, int ptnLen, int flags); MODULE_SCOPE double TclCeil(const mp_int *a); +MODULE_SCOPE void TclChannelPreserve(Tcl_Channel chan); +MODULE_SCOPE void TclChannelRelease(Tcl_Channel chan); MODULE_SCOPE int TclCheckBadOctal(Tcl_Interp *interp, const char *value); MODULE_SCOPE int TclChanCaughtErrorBypass(Tcl_Interp *interp, |