diff options
author | Kevin B Kenny <kennykb@acm.org> | 2001-04-04 16:07:20 (GMT) |
---|---|---|
committer | Kevin B Kenny <kennykb@acm.org> | 2001-04-04 16:07:20 (GMT) |
commit | 2c48422a192dbde1b5a70ff98215341aa88272ad (patch) | |
tree | 742b0af0f8ca321b69d41c90f80cffe211fd3e73 /generic/tclStubLib.c | |
parent | 947cb3910acc0fd7e89f2f78b6f487d6862be815 (diff) | |
download | tcl-2c48422a192dbde1b5a70ff98215341aa88272ad.zip tcl-2c48422a192dbde1b5a70ff98215341aa88272ad.tar.gz tcl-2c48422a192dbde1b5a70ff98215341aa88272ad.tar.bz2 |
(TIP#27) Changed a number of Tcl API's to accept "CONST char*"
in place of simple "char*". (kennykb) [Patch #404026]
Diffstat (limited to 'generic/tclStubLib.c')
-rw-r--r-- | generic/tclStubLib.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclStubLib.c b/generic/tclStubLib.c index df1d385..f1f165e 100644 --- a/generic/tclStubLib.c +++ b/generic/tclStubLib.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: tclStubLib.c,v 1.4 1999/05/25 01:00:27 stanton Exp $ + * RCS: @(#) $Id: tclStubLib.c,v 1.5 2001/04/04 16:07:21 kennykb Exp $ */ /* @@ -80,13 +80,13 @@ HasStubSupport (interp) #undef Tcl_InitStubs #endif -char * +CONST char * Tcl_InitStubs (interp, version, exact) Tcl_Interp *interp; - char *version; + CONST char *version; int exact; { - char *actualVersion; + CONST char *actualVersion; TclStubs *tmp; if (!tclStubsPtr) { |