summaryrefslogtreecommitdiffstats
path: root/generic/tkCmds.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2002-01-17 05:13:11 (GMT)
committerdgp <dgp@users.sourceforge.net>2002-01-17 05:13:11 (GMT)
commite18b826ed756e177fc0e6f96fed210bf26bcb8b7 (patch)
treea64645a35b960e288a19b038e87f81a9248f5709 /generic/tkCmds.c
parente2d6df79c697064b173e14f29a157733ad3a9a6f (diff)
downloadtk-e18b826ed756e177fc0e6f96fed210bf26bcb8b7.zip
tk-e18b826ed756e177fc0e6f96fed210bf26bcb8b7.tar.gz
tk-e18b826ed756e177fc0e6f96fed210bf26bcb8b7.tar.bz2
* Updates to handle change in type of tablePtr
argument of Tcl_GetIndexFromObj(Struct) from (char **) to (CONST char **). [TIP 27] [Patch 504705]
Diffstat (limited to 'generic/tkCmds.c')
-rw-r--r--generic/tkCmds.c14
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",