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 a61d82b..4b903ef 100644 --- a/generic/tclInt.decls +++ b/generic/tclInt.decls @@ -10,7 +10,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.23 2000/09/28 06:38:21 hobbs Exp $ +# RCS: @(#) $Id: tclInt.decls,v 1.24 2001/04/24 20:59:18 kennykb Exp $ library tcl @@ -157,10 +157,10 @@ declare 37 generic { int TclGetLoadedPackages(Tcl_Interp *interp, char *targetName) } declare 38 generic { - int TclGetNamespaceForQualName(Tcl_Interp *interp, char *qualName, \ + int TclGetNamespaceForQualName(Tcl_Interp *interp, CONST char *qualName, \ Namespace *cxtNsPtr, int flags, Namespace **nsPtrPtr, \ Namespace **altNsPtrPtr, Namespace **actualCxtPtrPtr, \ - char **simpleNamePtr) + CONST char **simpleNamePtr) } declare 39 generic { TclObjCmdProcType TclGetObjInterpProc(void) @@ -425,7 +425,7 @@ declare 112 generic { Tcl_Obj *objPtr) } declare 113 generic { - Tcl_Namespace * Tcl_CreateNamespace(Tcl_Interp *interp, char *name, \ + Tcl_Namespace * Tcl_CreateNamespace(Tcl_Interp *interp, CONST char *name, \ ClientData clientData, Tcl_NamespaceDeleteProc *deleteProc) } declare 114 generic { @@ -436,7 +436,7 @@ declare 115 generic { int resetListFirst) } declare 116 generic { - Tcl_Command Tcl_FindCommand(Tcl_Interp *interp, char *name, \ + Tcl_Command Tcl_FindCommand(Tcl_Interp *interp, CONST char *name, \ Tcl_Namespace *contextNsPtr, int flags) } declare 117 generic { |