diff options
| author | nijtmans <nijtmans> | 2008-10-16 22:34:18 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2008-10-16 22:34:18 (GMT) |
| commit | 8b464633a0f2df93912ad25af65a5724cd643da2 (patch) | |
| tree | c92c0492d1db21f9b0c7f880eec5c0cd3ce36762 /generic/tclIORChan.c | |
| parent | 2b0bd4b76e50ee9f511c827309e0078efc6f537a (diff) | |
| download | tcl-8b464633a0f2df93912ad25af65a5724cd643da2.zip tcl-8b464633a0f2df93912ad25af65a5724cd643da2.tar.gz tcl-8b464633a0f2df93912ad25af65a5724cd643da2.tar.bz2 | |
Add "const" to many internal
const tables. No functional
or API change.
Diffstat (limited to 'generic/tclIORChan.c')
| -rw-r--r-- | generic/tclIORChan.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c index a30469b..679f393 100644 --- a/generic/tclIORChan.c +++ b/generic/tclIORChan.c @@ -15,7 +15,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIORChan.c,v 1.34 2008/07/03 17:38:38 andreas_kupries Exp $ + * RCS: @(#) $Id: tclIORChan.c,v 1.35 2008/10/16 22:34:19 nijtmans Exp $ */ #include <tclInt.h> @@ -161,7 +161,7 @@ typedef struct { * Event literals. ================================================== */ -static const char *eventOptions[] = { +static const char *const eventOptions[] = { "read", "write", NULL }; typedef enum { @@ -172,7 +172,7 @@ typedef enum { * Method literals. ================================================== */ -static const char *methodNames[] = { +static const char *const methodNames[] = { "blocking", /* OPT */ "cget", /* OPT \/ Together or none */ "cgetall", /* OPT /\ of these two */ @@ -2737,12 +2737,12 @@ ForwardProc( */ rcmPtr = GetReflectedChannelMap(interp); - hPtr = Tcl_FindHashEntry(&rcmPtr->map, + hPtr = Tcl_FindHashEntry(&rcmPtr->map, Tcl_GetChannelName(rcPtr->chan)); Tcl_DeleteHashEntry(hPtr); rcmPtr = GetThreadReflectedChannelMap(); - hPtr = Tcl_FindHashEntry(&rcmPtr->map, + hPtr = Tcl_FindHashEntry(&rcmPtr->map, Tcl_GetChannelName(rcPtr->chan)); Tcl_DeleteHashEntry(hPtr); |