diff options
author | nijtmans <nijtmans> | 2008-10-04 11:34:19 (GMT) |
---|---|---|
committer | nijtmans <nijtmans> | 2008-10-04 11:34:19 (GMT) |
commit | cf24f0cc5f58ca91c49d46e631feeaf536162fb0 (patch) | |
tree | d1a4fd536b1f555cbb9dd514c151884c46c26c26 /generic/tclDecls.h | |
parent | 67aa8715c3ab84a6c636b90a48b5a565c1dcc162 (diff) | |
download | tcl-cf24f0cc5f58ca91c49d46e631feeaf536162fb0.zip tcl-cf24f0cc5f58ca91c49d46e631feeaf536162fb0.tar.gz tcl-cf24f0cc5f58ca91c49d46e631feeaf536162fb0.tar.bz2 |
* doc/RegConfig.3: CONSTified the configuration argument
* generic/tcl.decls: of Tcl_RegisterConfig.
* generic/tclConfig.c
* generic/tclPkgConfig.c
* ChangeLog
* generic/tclDecls.h: regenerated
This change complies with TIP #27.
Diffstat (limited to 'generic/tclDecls.h')
-rw-r--r-- | generic/tclDecls.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index f015e4c..68c220c 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclDecls.h,v 1.150 2008/10/04 11:04:43 nijtmans Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.151 2008/10/04 11:34:20 nijtmans Exp $ */ #ifndef _TCLDECLS @@ -3063,7 +3063,7 @@ EXTERN Tcl_Obj * Tcl_DbNewDictObj (CONST char * file, int line); /* 505 */ EXTERN void Tcl_RegisterConfig (Tcl_Interp* interp, CONST char* pkgName, - Tcl_Config* configuration, + CONST Tcl_Config* configuration, CONST char* valEncoding); #endif #ifndef Tcl_CreateNamespace_TCL_DECLARED @@ -4221,7 +4221,7 @@ typedef struct TclStubs { int (*tcl_DictObjRemoveKeyList) (Tcl_Interp * interp, Tcl_Obj * dictPtr, int keyc, Tcl_Obj *CONST * keyv); /* 502 */ Tcl_Obj * (*tcl_NewDictObj) (void); /* 503 */ Tcl_Obj * (*tcl_DbNewDictObj) (CONST char * file, int line); /* 504 */ - void (*tcl_RegisterConfig) (Tcl_Interp* interp, CONST char* pkgName, Tcl_Config* configuration, CONST char* valEncoding); /* 505 */ + void (*tcl_RegisterConfig) (Tcl_Interp* interp, CONST char* pkgName, CONST Tcl_Config* configuration, CONST char* valEncoding); /* 505 */ Tcl_Namespace * (*tcl_CreateNamespace) (Tcl_Interp * interp, CONST char * name, ClientData clientData, Tcl_NamespaceDeleteProc * deleteProc); /* 506 */ void (*tcl_DeleteNamespace) (Tcl_Namespace * nsPtr); /* 507 */ int (*tcl_AppendExportList) (Tcl_Interp * interp, Tcl_Namespace * nsPtr, Tcl_Obj * objPtr); /* 508 */ |