diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-01-18 14:07:40 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-01-18 14:07:40 (GMT) |
| commit | 9844b5a37d9de3fc5bff2794df66411a2b76c6e3 (patch) | |
| tree | 4a33ac545e2bfccb9b51bc46692dc5dc022f3640 /win/tclWinDde.c | |
| parent | 576ff583b9b5150aedde8eb39bf2f8113a040047 (diff) | |
| download | tcl-9844b5a37d9de3fc5bff2794df66411a2b76c6e3.zip tcl-9844b5a37d9de3fc5bff2794df66411a2b76c6e3.tar.gz tcl-9844b5a37d9de3fc5bff2794df66411a2b76c6e3.tar.bz2 | |
* Overlooked callers of Tcl_GetIndexFromObj
Diffstat (limited to 'win/tclWinDde.c')
| -rw-r--r-- | win/tclWinDde.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/win/tclWinDde.c b/win/tclWinDde.c index 04a306f..80e3070 100644 --- a/win/tclWinDde.c +++ b/win/tclWinDde.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinDde.c,v 1.7 2001/08/22 23:56:14 hobbs Exp $ + * RCS: @(#) $Id: tclWinDde.c,v 1.8 2002/01/18 14:07:40 dgp Exp $ */ #include "tclPort.h" @@ -834,11 +834,11 @@ Tcl_DdeObjCmd( DDE_EVAL }; - static char *ddeCommands[] = {"servername", "execute", "poke", + static CONST char *ddeCommands[] = {"servername", "execute", "poke", "request", "services", "eval", (char *) NULL}; - static char *ddeOptions[] = {"-async", (char *) NULL}; - static char *ddeReqOptions[] = {"-binary", (char *) NULL}; + static CONST char *ddeOptions[] = {"-async", (char *) NULL}; + static CONST char *ddeReqOptions[] = {"-binary", (char *) NULL}; int index, argIndex; int async = 0, binary = 0; int result = TCL_OK; |