diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-04-08 18:11:33 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-04-08 18:11:33 (GMT) |
| commit | 2bcd186571b8f37c820add859b48f7046260d261 (patch) | |
| tree | 6dbd95c782b9c5f5d998bac40cd3c6aced5ca61f /generic/tclOOMethod.c | |
| parent | e51453c41298f99bcf7ea71f57c69463d5b904a9 (diff) | |
| download | tcl-2bcd186571b8f37c820add859b48f7046260d261.zip tcl-2bcd186571b8f37c820add859b48f7046260d261.tar.gz tcl-2bcd186571b8f37c820add859b48f7046260d261.tar.bz2 | |
Revise TclNREvalObjv so that pre-resolution of the Command by a caller
does not force suppression of exception handling. Let those be separable
demands. Aim is to bring TclObjInvoke*() into the fold.
Diffstat (limited to 'generic/tclOOMethod.c')
| -rw-r--r-- | generic/tclOOMethod.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclOOMethod.c b/generic/tclOOMethod.c index 98b4078..bd2744a 100644 --- a/generic/tclOOMethod.c +++ b/generic/tclOOMethod.c @@ -1429,7 +1429,7 @@ InvokeForwardMethod( contextPtr->oPtr->namespacePtr, 0 /* normal lookup */); } Tcl_NRAddCallback(interp, FinalizeForwardCall, argObjs, NULL, NULL, NULL); - return TclNREvalObjv(interp, len, argObjs, TCL_EVAL_INVOKE, cmdPtr); + return TclNREvalObjv(interp, len, argObjs, TCL_EVAL_NOERR, cmdPtr); } static int |