summaryrefslogtreecommitdiffstats
path: root/generic/tclIntDecls.h
diff options
context:
space:
mode:
authorKevin B Kenny <kennykb@acm.org>2002-01-09 19:09:28 (GMT)
committerKevin B Kenny <kennykb@acm.org>2002-01-09 19:09:28 (GMT)
commitb2c02107babc232a4bf2c760ee63e7c789d1ab18 (patch)
treed9ff624d30f0c4b9021e9addabd2c3260c861a11 /generic/tclIntDecls.h
parentc71e44408e9b40395f6a6be8e73df1cf530da7f9 (diff)
downloadtcl-b2c02107babc232a4bf2c760ee63e7c789d1ab18.zip
tcl-b2c02107babc232a4bf2c760ee63e7c789d1ab18.tar.gz
tcl-b2c02107babc232a4bf2c760ee63e7c789d1ab18.tar.bz2
Updated APIs in the files */tcl*Load*.c according to the guidelines
of TIP 27.
Diffstat (limited to 'generic/tclIntDecls.h')
-rw-r--r--generic/tclIntDecls.h8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h
index 9e4574e..f7f0dce 100644
--- a/generic/tclIntDecls.h
+++ b/generic/tclIntDecls.h
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclIntDecls.h,v 1.32 2002/01/05 22:55:51 dgp Exp $
+ * RCS: @(#) $Id: tclIntDecls.h,v 1.33 2002/01/09 19:09:28 kennykb Exp $
*/
#ifndef _TCLINTDECLS
@@ -167,8 +167,8 @@ EXTERN char * TclpGetUserHome _ANSI_ARGS_((CONST char * name,
EXTERN int TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp * interp,
int argc, char ** argv, int flags));
/* 44 */
-EXTERN int TclGuessPackageName _ANSI_ARGS_((char * fileName,
- Tcl_DString * bufPtr));
+EXTERN int TclGuessPackageName _ANSI_ARGS_((
+ CONST char * fileName, Tcl_DString * bufPtr));
/* 45 */
EXTERN int TclHideUnsafeCommands _ANSI_ARGS_((
Tcl_Interp * interp));
@@ -567,7 +567,7 @@ typedef struct TclIntStubs {
Tcl_Command (*tclGetOriginalCommand) _ANSI_ARGS_((Tcl_Command command)); /* 41 */
char * (*tclpGetUserHome) _ANSI_ARGS_((CONST char * name, Tcl_DString * bufferPtr)); /* 42 */
int (*tclGlobalInvoke) _ANSI_ARGS_((Tcl_Interp * interp, int argc, char ** argv, int flags)); /* 43 */
- int (*tclGuessPackageName) _ANSI_ARGS_((char * fileName, Tcl_DString * bufPtr)); /* 44 */
+ int (*tclGuessPackageName) _ANSI_ARGS_((CONST char * fileName, Tcl_DString * bufPtr)); /* 44 */
int (*tclHideUnsafeCommands) _ANSI_ARGS_((Tcl_Interp * interp)); /* 45 */
int (*tclInExit) _ANSI_ARGS_((void)); /* 46 */
Tcl_Obj * (*tclIncrElementOfIndexedArray) _ANSI_ARGS_((Tcl_Interp * interp, int localIndex, Tcl_Obj * elemPtr, long incrAmount)); /* 47 */