diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2012-07-02 15:11:56 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2012-07-02 15:11:56 (GMT) |
| commit | 2c9a2e44b7512cac8761344d736eab4a2ecb898a (patch) | |
| tree | 8fdc150776322e30a4962cac4ed0f3066d6e123a /generic/tclNamesp.c | |
| parent | f0b21d92bbb9f1ece0924af005f5910d5c628f59 (diff) | |
| download | tcl-2c9a2e44b7512cac8761344d736eab4a2ecb898a.zip tcl-2c9a2e44b7512cac8761344d736eab4a2ecb898a.tar.gz tcl-2c9a2e44b7512cac8761344d736eab4a2ecb898a.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); |