diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-07-02 15:11:56 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-07-02 15:11:56 (GMT) |
| commit | 9e3cbe2c2f2edf7bd88649e927c9ac16a4ad0936 (patch) | |
| tree | 8fdc150776322e30a4962cac4ed0f3066d6e123a /generic/tclNamesp.c | |
| parent | d1c2087b3947042cc731e8b5b45d38a1168e4af7 (diff) | |
| download | tcl-9e3cbe2c2f2edf7bd88649e927c9ac16a4ad0936.zip tcl-9e3cbe2c2f2edf7bd88649e927c9ac16a4ad0936.tar.gz tcl-9e3cbe2c2f2edf7bd88649e927c9ac16a4ad0936.tar.bz2 | |
NRInterpCoroutine -> TclNRInterpCoroutine
make NRCommand static
make TalInstructionTable static const
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 73bc644..46ff6da 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -24,7 +24,7 @@ */ #include "tclInt.h" -#include "tclCompile.h" /* for NRCommand; and TclLogCommandInfo visibility */ +#include "tclCompile.h" /* for TclLogCommandInfo visibility */ /* * Thread-local storage used to avoid having a global lock on data that is not @@ -916,7 +916,7 @@ Tcl_DeleteNamespace( for (entryPtr = Tcl_FirstHashEntry(&nsPtr->cmdTable, &search); entryPtr != NULL;) { cmdPtr = Tcl_GetHashValue(entryPtr); - if (cmdPtr->nreProc == NRInterpCoroutine) { + if (cmdPtr->nreProc == TclNRInterpCoroutine) { Tcl_DeleteCommandFromToken((Tcl_Interp *) iPtr, (Tcl_Command) cmdPtr); entryPtr = Tcl_FirstHashEntry(&nsPtr->cmdTable, &search); |