diff options
| author | nijtmans <nijtmans> | 2010-03-27 22:40:13 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-03-27 22:40:13 (GMT) |
| commit | 419d5645c272033992ce63a5c714a64436e9f189 (patch) | |
| tree | ea1e97233f6104789908e88752e680e1fa3959dc /generic/tclInt.h | |
| parent | 05f862b0622794e90c90544b62b929ac0f47753c (diff) | |
| download | tcl-419d5645c272033992ce63a5c714a64436e9f189.zip tcl-419d5645c272033992ce63a5c714a64436e9f189.tar.gz tcl-419d5645c272033992ce63a5c714a64436e9f189.tar.bz2 | |
[Freq 2974744] share exception codes (ObjType?)
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 9661894..422e203 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -15,7 +15,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.465 2010/03/19 11:54:07 dkf Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.466 2010/03/27 22:40:14 nijtmans Exp $ */ #ifndef _TCLINT @@ -2870,6 +2870,8 @@ MODULE_SCOPE Tcl_Obj * TclGetBgErrorHandler(Tcl_Interp *interp); MODULE_SCOPE int TclGetChannelFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_Channel *chanPtr, int *modePtr, int flags); +MODULE_SCOPE int TclGetCompletionCodeFromObj(Tcl_Interp *interp, + Tcl_Obj *value, int *code); MODULE_SCOPE int TclGetNumberFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, ClientData *clientDataPtr, int *typePtr); |