Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Squelch another unnecessary cast. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
8ad026f31b99cc47e56ecdb6ecbe8c04 |
User & Date: | dkf 2011-03-26 11:58:37 |
Context
2011-03-26
| ||
12:12 | More generation of errorCode information. check-in: a70db7c3eb user: dkf tags: trunk | |
11:58 | Squelch another unnecessary cast. check-in: 8ad026f31b user: dkf tags: trunk | |
11:53 | Reduce the number of casts used to manage Tcl_Obj internal representations. check-in: b2381061a7 user: dkf tags: trunk | |
Changes
Changes to generic/tclNamesp.c.
︙ | ︙ | |||
907 908 909 910 911 912 913 | * * NOTE: we could avoid traversing the ns's command list by keeping a * separate list of coros. */ for (entryPtr = Tcl_FirstHashEntry(&nsPtr->cmdTable, &search); entryPtr != NULL;) { | | | 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 | * * NOTE: we could avoid traversing the ns's command list by keeping a * separate list of coros. */ for (entryPtr = Tcl_FirstHashEntry(&nsPtr->cmdTable, &search); entryPtr != NULL;) { cmdPtr = Tcl_GetHashValue(entryPtr); if (cmdPtr->nreProc == NRInterpCoroutine) { Tcl_DeleteCommandFromToken((Tcl_Interp *) iPtr, (Tcl_Command) cmdPtr); entryPtr = Tcl_FirstHashEntry(&nsPtr->cmdTable, &search); } else { entryPtr = Tcl_NextHashEntry(&search); } |
︙ | ︙ |