diff options
| author | dgp@users.sourceforge.net <dgp> | 2002-02-28 05:11:24 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2002-02-28 05:11:24 (GMT) |
| commit | 9c27853e338a58260568a97e37a7db4c87ef8319 (patch) | |
| tree | 2b9c586de5573bc73d089f27034488ef9f4f1972 /generic/tclDecls.h | |
| parent | 3cb6c79305046286f21b60e078398badcd18f011 (diff) | |
| download | tcl-9c27853e338a58260568a97e37a7db4c87ef8319.zip tcl-9c27853e338a58260568a97e37a7db4c87ef8319.tar.gz tcl-9c27853e338a58260568a97e37a7db4c87ef8319.tar.bz2 | |
* doc/GetIndex.3:
* generic/tcl.decls (Tcl_GetIndexFromObjStruct):
* generic/tclIndexObj.c (Tcl_GetIndexFromObjStruct): Revised the
prototype of the Tcl_GetIndexFromObjStruct to take its struct
table as a (CONST VOID *) argument, better describing what it is,
maintaining source compatibility, and adding CONST correctness
according to TIP 27. Thanks to Joe English for an elegant
solution. [Bug 520304]
* generic/tclDecls.h: make genstubs
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 65cc00b..e3f46ba 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.84 2002/02/20 18:46:29 dgp Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.85 2002/02/28 05:11:25 dgp Exp $ */ #ifndef _TCLDECLS @@ -987,7 +987,7 @@ EXTERN void Tcl_GetEncodingNames _ANSI_ARGS_(( /* 304 */ EXTERN int Tcl_GetIndexFromObjStruct _ANSI_ARGS_(( Tcl_Interp * interp, Tcl_Obj * objPtr, - CONST84 char ** tablePtr, int offset, + CONST VOID * tablePtr, int offset, CONST char * msg, int flags, int * indexPtr)); /* 305 */ EXTERN VOID * Tcl_GetThreadData _ANSI_ARGS_(( @@ -1916,7 +1916,7 @@ typedef struct TclStubs { Tcl_Encoding (*tcl_GetEncoding) _ANSI_ARGS_((Tcl_Interp * interp, CONST char * name)); /* 301 */ CONST char * (*tcl_GetEncodingName) _ANSI_ARGS_((Tcl_Encoding encoding)); /* 302 */ void (*tcl_GetEncodingNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 303 */ - int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CONST84 char ** tablePtr, int offset, CONST char * msg, int flags, int * indexPtr)); /* 304 */ + int (*tcl_GetIndexFromObjStruct) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * objPtr, CONST VOID * tablePtr, int offset, CONST char * msg, int flags, int * indexPtr)); /* 304 */ VOID * (*tcl_GetThreadData) _ANSI_ARGS_((Tcl_ThreadDataKey * keyPtr, int size)); /* 305 */ Tcl_Obj * (*tcl_GetVar2Ex) _ANSI_ARGS_((Tcl_Interp * interp, char * part1, char * part2, int flags)); /* 306 */ ClientData (*tcl_InitNotifier) _ANSI_ARGS_((void)); /* 307 */ |