diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2006-09-26 23:01:10 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2006-09-26 23:01:10 (GMT) |
| commit | b725003f03a39521f6ea93c9ee3f7a688eb96674 (patch) | |
| tree | 0ce810c294bb948261ddbab693ef6d314cde3a0d /generic | |
| parent | 6142afe35274394fb66bf8ec381f250f4cb9dd11 (diff) | |
| download | tcl-b725003f03a39521f6ea93c9ee3f7a688eb96674.zip tcl-b725003f03a39521f6ea93c9ee3f7a688eb96674.tar.gz tcl-b725003f03a39521f6ea93c9ee3f7a688eb96674.tar.bz2 | |
TIP 27 changes for Tcl_CreateEncoding
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tcl.decls | 4 | ||||
| -rw-r--r-- | generic/tclDecls.h | 6 | ||||
| -rw-r--r-- | generic/tclEncoding.c | 4 |
3 files changed, 7 insertions, 7 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 189bcaf..d92985f 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -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: tcl.decls,v 1.121 2006/09/22 18:13:27 andreas_kupries Exp $ +# RCS: @(#) $Id: tcl.decls,v 1.122 2006/09/26 23:01:10 kennykb Exp $ library tcl @@ -1036,7 +1036,7 @@ declare 286 generic { void Tcl_AppendObjToObj(Tcl_Obj *objPtr, Tcl_Obj *appendObjPtr) } declare 287 generic { - Tcl_Encoding Tcl_CreateEncoding(Tcl_EncodingType *typePtr) + Tcl_Encoding Tcl_CreateEncoding(const Tcl_EncodingType *typePtr) } declare 288 generic { void Tcl_CreateThreadExitHandler(Tcl_ExitProc *proc, ClientData clientData) diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 35776db..5a8de11 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.123 2006/09/22 18:13:28 andreas_kupries Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.124 2006/09/26 23:01:10 kennykb Exp $ */ #ifndef _TCLDECLS @@ -1818,7 +1818,7 @@ EXTERN void Tcl_AppendObjToObj _ANSI_ARGS_((Tcl_Obj * objPtr, #define Tcl_CreateEncoding_TCL_DECLARED /* 287 */ EXTERN Tcl_Encoding Tcl_CreateEncoding _ANSI_ARGS_(( - Tcl_EncodingType * typePtr)); + const Tcl_EncodingType * typePtr)); #endif #ifndef Tcl_CreateThreadExitHandler_TCL_DECLARED #define Tcl_CreateThreadExitHandler_TCL_DECLARED @@ -3907,7 +3907,7 @@ typedef struct TclStubs { void (*tcl_SetMainLoop) _ANSI_ARGS_((Tcl_MainLoopProc * proc)); /* 284 */ void *reserved285; void (*tcl_AppendObjToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_Obj * appendObjPtr)); /* 286 */ - Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((Tcl_EncodingType * typePtr)); /* 287 */ + Tcl_Encoding (*tcl_CreateEncoding) _ANSI_ARGS_((const Tcl_EncodingType * typePtr)); /* 287 */ void (*tcl_CreateThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 288 */ void (*tcl_DeleteThreadExitHandler) _ANSI_ARGS_((Tcl_ExitProc * proc, ClientData clientData)); /* 289 */ void (*tcl_DiscardResult) _ANSI_ARGS_((Tcl_SavedResult * statePtr)); /* 290 */ diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index f5e216a..a766013 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -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: tclEncoding.c,v 1.43 2006/08/09 18:12:25 dgp Exp $ + * RCS: @(#) $Id: tclEncoding.c,v 1.44 2006/09/26 23:01:11 kennykb Exp $ */ #include "tclInt.h" @@ -983,7 +983,7 @@ Tcl_SetSystemEncoding( Tcl_Encoding Tcl_CreateEncoding( - Tcl_EncodingType *typePtr) /* The encoding type. */ + const Tcl_EncodingType *typePtr) /* The encoding type. */ { Tcl_HashEntry *hPtr; int new; |