diff options
| author | nijtmans <nijtmans> | 2008-10-05 22:25:35 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2008-10-05 22:25:35 (GMT) |
| commit | 06d77e88c1820d6b44d1450d66d93d5950779ea8 (patch) | |
| tree | 578409d445995ed8603c1288507ce8ce7ae0bf0c /generic/tclDecls.h | |
| parent | c095ba4368ae987448c8141e73b12276031ed168 (diff) | |
| download | tcl-06d77e88c1820d6b44d1450d66d93d5950779ea8.zip tcl-06d77e88c1820d6b44d1450d66d93d5950779ea8.tar.gz tcl-06d77e88c1820d6b44d1450d66d93d5950779ea8.tar.bz2 | |
* doc/FileSystem.3: CONSTified Tcl_FSFileAttrStringsProc
* generic/tclFCmd.c: and tclpFileAttrStrings. This allows
* generic/tclIOUtil.c: FileSystems to report their attributes
* generic/tclTest.c: as const strings, without worrying that
* unix/tclUnixFCmd.c: Tcl modifies them (which Tcl should not
* win/tclWinFCmd.c: do anyway, but the API didn't indicate that)
* generic/tcl.decls
* generic/tclDecls.h: regenerated
* generic/tcl.h: make sure that if CONST84 is defined
as empty, CONST86 should be defined
as empty as well (unless overridden).
This change complies with TIP #27
*** POTENTIAL INCOMPATIBILITY ***
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 2650172..8b7beaa 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.153 2008/10/04 12:33:34 nijtmans Exp $ + * RCS: @(#) $Id: tclDecls.h,v 1.154 2008/10/05 22:25:35 nijtmans Exp $ */ #ifndef _TCLDECLS @@ -2760,7 +2760,7 @@ EXTERN int Tcl_FSFileAttrsSet (Tcl_Interp * interp, int index, #ifndef Tcl_FSFileAttrStrings_TCL_DECLARED #define Tcl_FSFileAttrStrings_TCL_DECLARED /* 453 */ -EXTERN CONST char ** Tcl_FSFileAttrStrings (Tcl_Obj * pathPtr, +EXTERN CONST char *CONST86 * Tcl_FSFileAttrStrings (Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); #endif #ifndef Tcl_FSStat_TCL_DECLARED @@ -4169,7 +4169,7 @@ typedef struct TclStubs { int (*tcl_FSUtime) (Tcl_Obj * pathPtr, struct utimbuf * tval); /* 450 */ int (*tcl_FSFileAttrsGet) (Tcl_Interp * interp, int index, Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); /* 451 */ int (*tcl_FSFileAttrsSet) (Tcl_Interp * interp, int index, Tcl_Obj * pathPtr, Tcl_Obj * objPtr); /* 452 */ - CONST char ** (*tcl_FSFileAttrStrings) (Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); /* 453 */ + CONST char *CONST86 * (*tcl_FSFileAttrStrings) (Tcl_Obj * pathPtr, Tcl_Obj ** objPtrRef); /* 453 */ int (*tcl_FSStat) (Tcl_Obj * pathPtr, Tcl_StatBuf * buf); /* 454 */ int (*tcl_FSAccess) (Tcl_Obj * pathPtr, int mode); /* 455 */ Tcl_Channel (*tcl_FSOpenFileChannel) (Tcl_Interp * interp, Tcl_Obj * pathPtr, CONST char * modeString, int permissions); /* 456 */ |