diff options
author | dgp <dgp@noemail.net> | 2002-03-20 22:47:35 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2002-03-20 22:47:35 (GMT) |
commit | ba9f95d5492347d48f0585b5a7d711347e973bf3 (patch) | |
tree | 8f368f02d83a51268df54df95963ddc703bfa767 /generic/tclInt.decls | |
parent | 431752470573c699cd64c8174c40c89614896d4d (diff) | |
download | tcl-ba9f95d5492347d48f0585b5a7d711347e973bf3.zip tcl-ba9f95d5492347d48f0585b5a7d711347e973bf3.tar.gz tcl-ba9f95d5492347d48f0585b5a7d711347e973bf3.tar.bz2 |
* Updated interfaces of generic/tclVar.c according
to TIP 27. In particular, the "part2" arguments were CONSTified.
FossilOrigin-Name: b64c27e52d63f10977aa98296f7f47941929cfff
Diffstat (limited to 'generic/tclInt.decls')
-rw-r--r-- | generic/tclInt.decls | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index 912c596..ca33071 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -12,7 +12,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tclInt.decls,v 1.46 2002/02/15 14:28:49 dkf Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.47 2002/03/20 22:47:36 dgp Exp $ library tcl @@ -236,7 +236,7 @@ declare 55 generic { # int TclLooksLikeInt(char *p) # } declare 58 generic { - Var * TclLookupVar(Tcl_Interp *interp, char *part1, char *part2, + Var * TclLookupVar(Tcl_Interp *interp, char *part1, CONST char *part2, int flags, char *msg, int createPart1, int createPart2, Var **arrayPtrPtr) } @@ -347,7 +347,7 @@ declare 81 generic { # } declare 88 generic { char * TclPrecTraceProc(ClientData clientData, Tcl_Interp *interp, - char *name1, char *name2, int flags) + char *name1, CONST char *name2, int flags) } declare 89 generic { int TclPreventAliasLoop(Tcl_Interp *interp, Tcl_Interp *cmdInterp, |