summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorhobbs <hobbs>2001-08-04 00:29:43 (GMT)
committerhobbs <hobbs>2001-08-04 00:29:43 (GMT)
commitd2c446fa70d95edabe7abc4ab43777c8151fb30b (patch)
tree5a3391edb097a14446607936652f4989b75c2cf2
parentdae90baa171fc792ca16e28aa05b16b63ab32954 (diff)
downloadtk-d2c446fa70d95edabe7abc4ab43777c8151fb30b.zip
tk-d2c446fa70d95edabe7abc4ab43777c8151fb30b.tar.gz
tk-d2c446fa70d95edabe7abc4ab43777c8151fb30b.tar.bz2
* win/winMain.c (WishPanic): fixed CONST changes to go with
CONST-ification in Tcl.
-rw-r--r--win/winMain.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/win/winMain.c b/win/winMain.c
index cf517b0..2d24a4f 100644
--- a/win/winMain.c
+++ b/win/winMain.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: winMain.c,v 1.10 2000/04/19 23:12:56 hobbs Exp $
+ * RCS: @(#) $Id: winMain.c,v 1.11 2001/08/04 00:29:43 hobbs Exp $
*/
#include <tk.h>
@@ -32,7 +32,7 @@
*/
static void setargv _ANSI_ARGS_((int *argcPtr, char ***argvPtr));
-static void WishPanic _ANSI_ARGS_(TCL_VARARGS(char *,format));
+static void WishPanic _ANSI_ARGS_(TCL_VARARGS(CONST char *,format));
#ifdef TK_TEST
extern int Tktest_Init(Tcl_Interp *interp);
@@ -237,13 +237,13 @@ error:
*/
void
-WishPanic TCL_VARARGS_DEF(char *,arg1)
+WishPanic TCL_VARARGS_DEF(CONST char *,arg1)
{
va_list argList;
char buf[1024];
- char *format;
+ CONST char *format;
- format = TCL_VARARGS_START(char *,arg1,argList);
+ format = TCL_VARARGS_START(CONST char *,arg1,argList);
vsprintf(buf, format, argList);
MessageBeep(MB_ICONEXCLAMATION);