diff options
| author | dgp <dgp@noemail.net> | 2002-01-17 05:13:10 (GMT) |
|---|---|---|
| committer | dgp <dgp@noemail.net> | 2002-01-17 05:13:10 (GMT) |
| commit | 6f9960a0107a6b5ab8758a61b46d59aaac91d08f (patch) | |
| tree | a64645a35b960e288a19b038e87f81a9248f5709 /generic/tkCmds.c | |
| parent | 461e603bd2608a84aaf052d9156a864416113681 (diff) | |
| download | tk-6f9960a0107a6b5ab8758a61b46d59aaac91d08f.zip tk-6f9960a0107a6b5ab8758a61b46d59aaac91d08f.tar.gz tk-6f9960a0107a6b5ab8758a61b46d59aaac91d08f.tar.bz2 | |
* Updates to handle change in type of tablePtr
argument of Tcl_GetIndexFromObj(Struct) from (char **) to
(CONST char **). [TIP 27] [Patch 504705]
FossilOrigin-Name: 85e5c7aa1baa3bd2b7bdb971f3cf83f4f5573723
Diffstat (limited to 'generic/tkCmds.c')
| -rw-r--r-- | generic/tkCmds.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/generic/tkCmds.c b/generic/tkCmds.c index 2149d58..572868c 100644 --- a/generic/tkCmds.c +++ b/generic/tkCmds.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkCmds.c,v 1.20 2001/09/21 21:19:02 hobbs Exp $ + * RCS: @(#) $Id: tkCmds.c,v 1.21 2002/01/17 05:13:11 dgp Exp $ */ #include "tkPort.h" @@ -63,7 +63,7 @@ Tk_BellObjCmd(clientData, interp, objc, objv) int objc; /* Number of arguments. */ Tcl_Obj *CONST objv[]; /* Argument objects. */ { - static char *bellOptions[] = {"-displayof", "-nice", (char *) NULL}; + static CONST char *bellOptions[] = {"-displayof", "-nice", (char *) NULL}; enum options { TK_BELL_DISPLAYOF, TK_BELL_NICE }; Tk_Window tkwin = (Tk_Window) clientData; int i, index, nice = 0; @@ -617,7 +617,7 @@ Tk_TkObjCmd(clientData, interp, objc, objv) { int index; Tk_Window tkwin; - static char *optionStrings[] = { + static CONST char *optionStrings[] = { "appname", "scaling", "useinputmethods", NULL }; enum options { @@ -757,7 +757,7 @@ Tk_TkwaitObjCmd(clientData, interp, objc, objv) { Tk_Window tkwin = (Tk_Window) clientData; int done, index; - static char *optionStrings[] = { "variable", "visibility", "window", + static CONST char *optionStrings[] = { "variable", "visibility", "window", (char *) NULL }; enum options { TKWAIT_VARIABLE, TKWAIT_VISIBILITY, TKWAIT_WINDOW }; @@ -919,7 +919,7 @@ Tk_UpdateObjCmd(clientData, interp, objc, objv) int objc; /* Number of arguments. */ Tcl_Obj *CONST objv[]; /* Argument objects. */ { - static char *updateOptions[] = {"idletasks", (char *) NULL}; + static CONST char *updateOptions[] = {"idletasks", (char *) NULL}; int flags, index; TkDisplay *dispPtr; @@ -1007,7 +1007,7 @@ Tk_WinfoObjCmd(clientData, interp, objc, objv) {StaticGray, "staticgray"}, {-1, NULL} }; - static char *optionStrings[] = { + static CONST char *optionStrings[] = { "cells", "children", "class", "colormapfull", "depth", "geometry", "height", "id", "ismapped", "manager", "name", "parent", @@ -1598,7 +1598,7 @@ Tk_WmObjCmd(clientData, interp, objc, objv) Tk_Window tkwin; TkWindow *winPtr; - static char *optionStrings[] = { + static CONST char *optionStrings[] = { "aspect", "client", "command", "deiconify", "focusmodel", "frame", "geometry", "grid", "group", "iconbitmap", "iconify", "iconmask", |