diff options
author | kennykb <kennykb@noemail.net> | 2010-09-27 20:33:37 (GMT) |
---|---|---|
committer | kennykb <kennykb@noemail.net> | 2010-09-27 20:33:37 (GMT) |
commit | a455bddf2b4f13d4ce168095f767f0bb12d08643 (patch) | |
tree | 7230190020b96b7377c7a1e8d4bc809e6c6ccd15 /generic/tclAssembly.c | |
parent | 308cedaaf456c302c7ae6fa178e9fa37d577329a (diff) | |
download | tcl-a455bddf2b4f13d4ce168095f767f0bb12d08643.zip tcl-a455bddf2b4f13d4ce168095f767f0bb12d08643.tar.gz tcl-a455bddf2b4f13d4ce168095f767f0bb12d08643.tar.bz2 |
Merged from HEAD.
Also replaced a funky NRCallTEBC with the new call TclNRExecuteByteCode.
FossilOrigin-Name: f7578626628dd6f2366e72f6cbf09df9d9354caa
Diffstat (limited to 'generic/tclAssembly.c')
-rw-r--r-- | generic/tclAssembly.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tclAssembly.c b/generic/tclAssembly.c index 660f101..4735a59 100644 --- a/generic/tclAssembly.c +++ b/generic/tclAssembly.c @@ -533,10 +533,13 @@ TclNRAssembleObjCmd( /* Use NRE to evaluate the bytecode from the trampoline */ + /* Tcl_NRAddCallback(interp, NRCallTEBC, INT2PTR(TCL_NR_BC_TYPE), codePtr, NULL, NULL); - return TCL_OK; + */ + return TclNRExecuteByteCode(interp, codePtr); + } /* |