diff options
| author | nijtmans <nijtmans> | 2009-01-22 06:42:33 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2009-01-22 06:42:33 (GMT) |
| commit | 1cc677fe337ed9c32c7a1bbaafc2988e98a8076f (patch) | |
| tree | 6d0ba0d888c02ee1ac8ad6f7a50157036d96fbd9 /generic/tclInt.h | |
| parent | ed5043f99afd5932ca7403cf20b19383d20dc9dc (diff) | |
| download | tcl-1cc677fe337ed9c32c7a1bbaafc2988e98a8076f.zip tcl-1cc677fe337ed9c32c7a1bbaafc2988e98a8076f.tar.gz tcl-1cc677fe337ed9c32c7a1bbaafc2988e98a8076f.tar.bz2 | |
CONSTify TclPrintInstruction and TclpNativeJoinPath (TIP #27)
{unix win} in *.decls is equivalent to {generic}
tclGetDate.y, tclDate.c: single internal const decoration
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index ee4fec7..b633e12 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -15,7 +15,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.h,v 1.413 2009/01/13 20:30:03 dkf Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.414 2009/01/22 06:42:33 nijtmans Exp $ */ #ifndef _TCLINT @@ -2792,7 +2792,7 @@ MODULE_SCOPE int TclpMatchFiles(Tcl_Interp *interp, char *separators, Tcl_DString *dirPtr, char *pattern, char *tail); MODULE_SCOPE int TclpObjNormalizePath(Tcl_Interp *interp, Tcl_Obj *pathPtr, int nextCheckpoint); -MODULE_SCOPE void TclpNativeJoinPath(Tcl_Obj *prefix, char *joining); +MODULE_SCOPE void TclpNativeJoinPath(Tcl_Obj *prefix, const char *joining); MODULE_SCOPE Tcl_Obj * TclpNativeSplitPath(Tcl_Obj *pathPtr, int *lenPtr); MODULE_SCOPE Tcl_PathType TclpGetNativePathType(Tcl_Obj *pathPtr, int *driveNameLengthPtr, Tcl_Obj **driveNameRef); |