diff options
| author | kennykb <kennykb@noemail.net> | 2001-04-04 16:07:20 (GMT) |
|---|---|---|
| committer | kennykb <kennykb@noemail.net> | 2001-04-04 16:07:20 (GMT) |
| commit | ca35b41b9aaf5d5d92b62ce0b32903c7a8588ffc (patch) | |
| tree | 742b0af0f8ca321b69d41c90f80cffe211fd3e73 /generic/tclStubLib.c | |
| parent | 0b48aaf9ec670de34fd228bc35c692ece17b7979 (diff) | |
| download | tcl-ca35b41b9aaf5d5d92b62ce0b32903c7a8588ffc.zip tcl-ca35b41b9aaf5d5d92b62ce0b32903c7a8588ffc.tar.gz tcl-ca35b41b9aaf5d5d92b62ce0b32903c7a8588ffc.tar.bz2 | |
(TIP#27) Changed a number of Tcl API's to accept "CONST char*"
in place of simple "char*". (kennykb) [Patch #404026]
FossilOrigin-Name: bda1abaf857abf5feb7ebd78aeb1f6a60fcbb8c0
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) { |