diff options
author | kennykb <kennykb@noemail.net> | 2002-01-09 19:09:28 (GMT) |
---|---|---|
committer | kennykb <kennykb@noemail.net> | 2002-01-09 19:09:28 (GMT) |
commit | d426f5313cded26bb8943d797dc070961b806a95 (patch) | |
tree | d9ff624d30f0c4b9021e9addabd2c3260c861a11 /generic/tclDecls.h | |
parent | ad07146f7b0ad680534bb92f02ebda849df4f876 (diff) | |
download | tcl-d426f5313cded26bb8943d797dc070961b806a95.zip tcl-d426f5313cded26bb8943d797dc070961b806a95.tar.gz tcl-d426f5313cded26bb8943d797dc070961b806a95.tar.bz2 |
Updated APIs in the files */tcl*Load*.c according to the guidelines
of TIP 27.
FossilOrigin-Name: ce9573a39cb9f42da11beec368b354ada882cbdd
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 d727963..49dc2f3 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.67 2001/12/18 15:21:20 dkf Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.68 2002/01/09 19:09:28 kennykb Exp $ */ #ifndef _TCLDECLS @@ -781,7 +781,7 @@ EXTERN void Tcl_SplitPath _ANSI_ARGS_((CONST char * path, int * argcPtr, char *** argvPtr)); /* 244 */ EXTERN void Tcl_StaticPackage _ANSI_ARGS_((Tcl_Interp * interp, - char * pkgName, + CONST char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc)); /* 245 */ @@ -1813,7 +1813,7 @@ typedef struct TclStubs { void (*tcl_SourceRCFile) _ANSI_ARGS_((Tcl_Interp * interp)); /* 241 */ int (*tcl_SplitList) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * listStr, int * argcPtr, char *** argvPtr)); /* 242 */ void (*tcl_SplitPath) _ANSI_ARGS_((CONST char * path, int * argcPtr, char *** argvPtr)); /* 243 */ - void (*tcl_StaticPackage) _ANSI_ARGS_((Tcl_Interp * interp, char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc)); /* 244 */ + void (*tcl_StaticPackage) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * pkgName, Tcl_PackageInitProc * initProc, Tcl_PackageInitProc * safeInitProc)); /* 244 */ int (*tcl_StringMatch) _ANSI_ARGS_((CONST char * str, CONST char * pattern)); /* 245 */ int (*tcl_Tell) _ANSI_ARGS_((Tcl_Channel chan)); /* 246 */ int (*tcl_TraceVar) _ANSI_ARGS_((Tcl_Interp * interp, char * varName, int flags, Tcl_VarTraceProc * proc, ClientData clientData)); /* 247 */ |