diff options
Diffstat (limited to 'generic/tclInt.decls')
| -rw-r--r-- | generic/tclInt.decls | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls index 8213109..3dfdfb7 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -13,7 +13,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tclInt.decls,v 1.127 2008/07/29 05:30:32 msofer Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.128 2008/10/05 20:47:52 nijtmans Exp $ library tcl @@ -576,7 +576,7 @@ declare 144 generic { int index) } declare 145 generic { - struct AuxDataType *TclGetAuxDataType(char *typeName) + CONST86 struct AuxDataType *TclGetAuxDataType(CONST char *typeName) } declare 146 generic { TclHandle TclHandleCreate(VOID *ptr) @@ -645,13 +645,13 @@ declare 162 generic { void TclChannelEventScriptInvoker(ClientData clientData, int flags) } -# ALERT: The result of 'TclGetInstructionTable' is actually an -# "InstructionDesc*" but we do not want to describe this structure in +# ALERT: The result of 'TclGetInstructionTable' is actually a +# "const InstructionDesc*" but we do not want to describe this structure in # "tclInt.h". It is described in "tclCompile.h". Use a cast to the # correct type when calling this procedure. declare 163 generic { - void *TclGetInstructionTable(void) + CONST86 void *TclGetInstructionTable(void) } # ALERT: The argument of 'TclExpandCodeArray' is actually a |