diff options
| author | jingham <jingham> | 1999-05-11 07:11:46 (GMT) |
|---|---|---|
| committer | jingham <jingham> | 1999-05-11 07:11:46 (GMT) |
| commit | 7e5fa22b2798227ac6c6f48a3f0d6f767f658c14 (patch) | |
| tree | 75a17d12246664b170ac64121f77deff56d7ef90 /mac/tclMacFCmd.c | |
| parent | 7c4092a142f2c47e20b34c96adfb38b9a70083a6 (diff) | |
| download | tcl-7e5fa22b2798227ac6c6f48a3f0d6f767f658c14.zip tcl-7e5fa22b2798227ac6c6f48a3f0d6f767f658c14.tar.gz tcl-7e5fa22b2798227ac6c6f48a3f0d6f767f658c14.tar.bz2 | |
Various small fixes that were required to get Tcl to build cleanly on the Mac.
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 716237e..dbd0680 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.4 1999/04/16 00:47:20 stanton Exp $ + * RCS: @(#) $Id: tclMacFCmd.c,v 1.5 1999/05/11 07:12:00 jingham Exp $ */ #include "tclInt.h" @@ -72,8 +72,8 @@ CONST TclFileAttrProcs tclpFileAttrProcs[] = { static pascal Boolean CopyErrHandler _ANSI_ARGS_((OSErr error, short failedOperation, short srcVRefNum, long srcDirID, - StringPtr srcName, short dstVRefNum, - long dstDirID,StringPtr dstName)); + ConstStr255Param srcName, short dstVRefNum, + long dstDirID,ConstStr255Param dstName)); static int DoCopyDirectory _ANSI_ARGS_((CONST char *src, CONST char *dst, Tcl_DString *errorPtr)); static int DoCopyFile _ANSI_ARGS_((CONST char *src, @@ -821,10 +821,10 @@ CopyErrHandler( short failedOperation, /* operation that caused the error */ short srcVRefNum, /* volume ref number of source */ long srcDirID, /* directory id of source */ - StringPtr srcName, /* name of source */ + ConstStr255Param srcName, /* name of source */ short dstVRefNum, /* volume ref number of dst */ long dstDirID, /* directory id of dst */ - StringPtr dstName) /* name of dst directory */ + ConstStr255Param dstName) /* name of dst directory */ { return true; } |