diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2013-09-09 12:34:33 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2013-09-09 12:34:33 (GMT) |
commit | 853361c087f0ae394f2efb70fe364d7c91de2931 (patch) | |
tree | 419c0f396a31ae1217e7fb54cabe2227e26f92e1 /generic/tclNamesp.c | |
parent | 7ef78ec33dcd4cf57d272e36d542a1c3c088495a (diff) | |
parent | 991ddbd26c7c24de6598ff9fe61a1d9f13186548 (diff) | |
download | tcl-853361c087f0ae394f2efb70fe364d7c91de2931.zip tcl-853361c087f0ae394f2efb70fe364d7c91de2931.tar.gz tcl-853361c087f0ae394f2efb70fe364d7c91de2931.tar.bz2 |
merge trunk
Diffstat (limited to 'generic/tclNamesp.c')
-rw-r--r-- | generic/tclNamesp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index aed623a..bdd5386 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -1942,7 +1942,7 @@ InvokeImportedNRCmd( Command *realCmdPtr = dataPtr->realCmdPtr; TclSkipTailcall(interp); - return Tcl_NRCmdSwap(interp, (Tcl_Command) realCmdPtr, objc, objv, 0); + return TclNREvalObjv(interp, objc, objv, TCL_EVAL_NOERR, realCmdPtr); } static int |