diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-07-07 07:48:53 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-07-07 07:48:53 (GMT) |
| commit | 72476cdd50825cebaea367188325e69ea5a8ff40 (patch) | |
| tree | 52448af5d0bd3975ccd1af4b672ca33a90507530 /generic/tclOO.c | |
| parent | 7519883347a28417d8c6d8a3de4460386f66ad29 (diff) | |
| parent | 0aa3b5113db3c6c750aa4bbcfdb657dec48c0de1 (diff) | |
| download | tcl-72476cdd50825cebaea367188325e69ea5a8ff40.zip tcl-72476cdd50825cebaea367188325e69ea5a8ff40.tar.gz tcl-72476cdd50825cebaea367188325e69ea5a8ff40.tar.bz2 | |
Merge core-8-6-branch:
New tests to demo the remaining flaw in ensemble dispatch revisions. Itcl 4 also demonstrated these
[bd7f17bce8] Revise ensemble dispatch to call TclNREvalObjv() which supports the TCL_EVAL_INVOKE
Simplify all the Tcl_NRPostProc declarations
Create and use a utility Tcl_NRPostProc when decr ref count of values is all that is needed
Bugfix [5d7ea04580]. Treat .cmd and .ps1 files are executable on Windows
Diffstat (limited to 'generic/tclOO.c')
| -rw-r--r-- | generic/tclOO.c | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/generic/tclOO.c b/generic/tclOO.c index 9dae778..ef0c987 100644 --- a/generic/tclOO.c +++ b/generic/tclOO.c @@ -68,12 +68,9 @@ static int CloneObjectMethod(Tcl_Interp *interp, Object *oPtr, static void DeletedDefineNamespace(ClientData clientData); static void DeletedObjdefNamespace(ClientData clientData); static void DeletedHelpersNamespace(ClientData clientData); -static int FinalizeAlloc(ClientData data[], - Tcl_Interp *interp, int result); -static int FinalizeNext(ClientData data[], - Tcl_Interp *interp, int result); -static int FinalizeObjectCall(ClientData data[], - Tcl_Interp *interp, int result); +static Tcl_NRPostProc FinalizeAlloc; +static Tcl_NRPostProc FinalizeNext; +static Tcl_NRPostProc FinalizeObjectCall; static int InitFoundation(Tcl_Interp *interp); static void KillFoundation(ClientData clientData, Tcl_Interp *interp); |