diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2009-01-13 20:30:03 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2009-01-13 20:30:03 (GMT) |
| commit | 2982ceeb51c99eb042c8477125d3d1da80b84387 (patch) | |
| tree | 01ade12b49117b7dbe4027f9ddff331b91731046 /generic/tclInt.h | |
| parent | 91fcbdbc1ce2836f8df968af33ce13bff991a90b (diff) | |
| download | tcl-2982ceeb51c99eb042c8477125d3d1da80b84387.zip tcl-2982ceeb51c99eb042c8477125d3d1da80b84387.tar.gz tcl-2982ceeb51c99eb042c8477125d3d1da80b84387.tar.bz2 | |
Move [throw] implementation into C.
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[]); |