diff options
| author | dkf <dkf@noemail.net> | 2009-01-13 20:30:03 (GMT) |
|---|---|---|
| committer | dkf <dkf@noemail.net> | 2009-01-13 20:30:03 (GMT) |
| commit | 7801d1645064e935dfbb401f877f792940b617bf (patch) | |
| tree | 01ade12b49117b7dbe4027f9ddff331b91731046 /generic/tclInt.h | |
| parent | ae9522c619ab2002f9a8f95ca9a2f2cebf0b756a (diff) | |
| download | tcl-7801d1645064e935dfbb401f877f792940b617bf.zip tcl-7801d1645064e935dfbb401f877f792940b617bf.tar.gz tcl-7801d1645064e935dfbb401f877f792940b617bf.tar.bz2 | |
Move [throw] implementation into C.
FossilOrigin-Name: edad2587319163e40688f4466ecb7d70b5ccfe3d
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 67ba634..ee4fec7 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.412 2009/01/06 09:49:39 dkf Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.413 2009/01/13 20:30:03 dkf Exp $ */ #ifndef _TCLINT @@ -3113,6 +3113,8 @@ MODULE_SCOPE int Tcl_SwitchObjCmd(ClientData clientData, MODULE_SCOPE int Tcl_TellObjCmd(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); +MODULE_SCOPE int Tcl_ThrowObjCmd(ClientData dummy, Tcl_Interp *interp, + int objc, Tcl_Obj *const objv[]); MODULE_SCOPE int Tcl_TimeObjCmd(ClientData clientData, Tcl_Interp *interp, int objc, Tcl_Obj *const objv[]); |