diff options
| author | das <das> | 2002-01-18 03:22:31 (GMT) |
|---|---|---|
| committer | das <das> | 2002-01-18 03:22:31 (GMT) |
| commit | cd728b4198f9384debed58dc7650a4e46b657237 (patch) | |
| tree | 1dc5faca8a9c13b94076efdffe995dc3ebfe4dca /mac/tclMacFCmd.c | |
| parent | 1979c67a816d1ee384f9c594443f80de15bb8f8f (diff) | |
| download | tcl-cd728b4198f9384debed58dc7650a4e46b657237.zip tcl-cd728b4198f9384debed58dc7650a4e46b657237.tar.gz tcl-cd728b4198f9384debed58dc7650a4e46b657237.tar.bz2 | |
* generic/tclThreadTest.c:
* mac/tclMacChan.c:
* mac/tclMacFCmd.c:
* mac/tclMacFile.c:
* mac/tclMacLoad.c:
* mac/tclMacResource.c: TIP 27 CONSTification broke the mac
build in a number of places.
Diffstat (limited to 'mac/tclMacFCmd.c')
| -rw-r--r-- | mac/tclMacFCmd.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/mac/tclMacFCmd.c b/mac/tclMacFCmd.c index 723eb5d..27196f5 100644 --- a/mac/tclMacFCmd.c +++ b/mac/tclMacFCmd.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclMacFCmd.c,v 1.12 2002/01/17 04:37:33 dgp Exp $ + * RCS: @(#) $Id: tclMacFCmd.c,v 1.13 2002/01/18 03:22:40 das Exp $ */ #include "tclInt.h" @@ -1163,7 +1163,7 @@ GetFileFinderAttributes( OSErr err; FSSpec fileSpec; FInfo finfo; - char *native; + CONST char *native; native=Tcl_FSGetNativePath(fileName); err = FSpLocationFromPath(strlen(native), @@ -1241,7 +1241,7 @@ GetFileReadOnly( OSErr err; FSSpec fileSpec; CInfoPBRec paramBlock; - char *native; + CONST char *native; native=Tcl_FSGetNativePath(fileName); err = FSpLocationFromPath(strlen(native), @@ -1305,7 +1305,7 @@ SetFileFinderAttributes( OSErr err; FSSpec fileSpec; FInfo finfo; - char *native; + CONST char *native; native=Tcl_FSGetNativePath(fileName); err = FSpLocationFromPath(strlen(native), @@ -1397,7 +1397,7 @@ SetFileReadOnly( FSSpec fileSpec; HParamBlockRec paramBlock; int hidden; - char *native; + CONST char *native; native=Tcl_FSGetNativePath(fileName); err = FSpLocationFromPath(strlen(native), |