diff options
| author | dgp <dgp@users.sourceforge.net> | 2002-01-15 21:29:12 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2002-01-15 21:29:12 (GMT) |
| commit | 227452e329f8e69279bc9ab93f21995b7249fab3 (patch) | |
| tree | ac59b3cc1136da914d8402255200a358309ebe11 /generic/tkMain.c | |
| parent | 241081870bc482f31dfc97458b316d57feecd264 (diff) | |
| download | tk-227452e329f8e69279bc9ab93f21995b7249fab3.zip tk-227452e329f8e69279bc9ab93f21995b7249fab3.tar.gz tk-227452e329f8e69279bc9ab93f21995b7249fab3.tar.bz2 | |
* Updated callers of CONSTified Tcl interfaces Tcl_EvalFile and
TclGetStartupScriptFileName.
Diffstat (limited to 'generic/tkMain.c')
| -rw-r--r-- | generic/tkMain.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tkMain.c b/generic/tkMain.c index 4fad91e..c2ea87a 100644 --- a/generic/tkMain.c +++ b/generic/tkMain.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkMain.c,v 1.10 2001/11/23 02:06:48 das Exp $ + * RCS: @(#) $Id: tkMain.c,v 1.11 2002/01/15 21:29:12 dgp Exp $ */ #include <ctype.h> @@ -101,7 +101,8 @@ Tk_MainEx(argc, argv, appInitProc, interp) * to execute commands. */ Tcl_Interp *interp; { - char *args, *fileName; + char *args; + CONST char *fileName; char buf[TCL_INTEGER_SPACE]; int code; size_t length; |