diff options
author | mig <mig> | 2013-01-10 02:38:55 (GMT) |
---|---|---|
committer | mig <mig> | 2013-01-10 02:38:55 (GMT) |
commit | 924eb49553971988b91d0a9cd73a4203455215e6 (patch) | |
tree | 1a305903e50566b04df9e353a015a10246f2a29d /generic/tclNamesp.c | |
parent | d4ad619c97d45199c5143ca313cf4daffe18653f (diff) | |
parent | e97463a0fb4ada0093dbe69808351b2ccb643c6d (diff) | |
download | tcl-924eb49553971988b91d0a9cd73a4203455215e6.zip tcl-924eb49553971988b91d0a9cd73a4203455215e6.tar.gz tcl-924eb49553971988b91d0a9cd73a4203455215e6.tar.bz2 |
merge mig-nre-mods
Diffstat (limited to 'generic/tclNamesp.c')
-rw-r--r-- | generic/tclNamesp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index e39df8a..f07f9b4 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -3268,7 +3268,7 @@ NamespaceEvalCmd( objPtr = Tcl_ConcatObj(objc-2, objv+2); } - TclNRAddCallback(interp, NsEval_Callback, namespacePtr, "eval", + Tcl_NRAddCallback(interp, NsEval_Callback, namespacePtr, "eval", NULL, NULL); return TclNREvalObjEx(interp, objPtr, 0); } @@ -3722,7 +3722,7 @@ NamespaceInscopeCmd( Tcl_DecrRefCount(listPtr); /* We're done with the list object. */ } - TclNRAddCallback(interp, NsEval_Callback, namespacePtr, "inscope", + Tcl_NRAddCallback(interp, NsEval_Callback, namespacePtr, "inscope", NULL, NULL); return TclNREvalObjEx(interp, cmdObjPtr, 0); } |