diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2011-03-26 11:58:37 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2011-03-26 11:58:37 (GMT) |
| commit | a4188bb98c1fdf3fff44c3552a26944064b0e8b1 (patch) | |
| tree | 00c76b8c1a8ef7f78334b2e4f34325706428e47e /generic/tclNamesp.c | |
| parent | 77029bd1e96f8df35c93b67699e5aee7c4546d72 (diff) | |
| download | tcl-a4188bb98c1fdf3fff44c3552a26944064b0e8b1.zip tcl-a4188bb98c1fdf3fff44c3552a26944064b0e8b1.tar.gz tcl-a4188bb98c1fdf3fff44c3552a26944064b0e8b1.tar.bz2 | |
Squelch another unnecessary cast.
Diffstat (limited to 'generic/tclNamesp.c')
| -rw-r--r-- | generic/tclNamesp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index 0f1eb4d..62ead7d 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -911,7 +911,7 @@ Tcl_DeleteNamespace( for (entryPtr = Tcl_FirstHashEntry(&nsPtr->cmdTable, &search); entryPtr != NULL;) { - cmdPtr = (Command *) Tcl_GetHashValue(entryPtr); + cmdPtr = Tcl_GetHashValue(entryPtr); if (cmdPtr->nreProc == NRInterpCoroutine) { Tcl_DeleteCommandFromToken((Tcl_Interp *) iPtr, (Tcl_Command) cmdPtr); |