diff options
Diffstat (limited to 'mac')
| -rw-r--r-- | mac/MW_TclHeader.pch | 14 | ||||
| -rw-r--r-- | mac/tclMacFile.c | 2 | ||||
| -rw-r--r-- | mac/tclMacPort.h | 2 |
3 files changed, 16 insertions, 2 deletions
diff --git a/mac/MW_TclHeader.pch b/mac/MW_TclHeader.pch index 6a27544..a5c133a 100644 --- a/mac/MW_TclHeader.pch +++ b/mac/MW_TclHeader.pch @@ -108,5 +108,17 @@ #include "tcl.h" #include "tclMac.h" #include "tclInt.h" -#pragma export off + +/* + * These three symbols are needed by Itcl, so we must export them + * here. They are all from tclCompile.h, but there is no need to + * export that whole file... + */ + +EXTERN void TclPrintSource _ANSI_ARGS_((FILE *outFile, + char *string, int maxChars)); +extern int tclTraceExec; +extern int tclTraceCompile; + +#pragma export reset diff --git a/mac/tclMacFile.c b/mac/tclMacFile.c index 3016a97..c15eeaa 100644 --- a/mac/tclMacFile.c +++ b/mac/tclMacFile.c @@ -416,7 +416,7 @@ TclMatchFiles( int TclpStat( - char *path, + CONST char *path, struct stat *buf) { HFileInfo fpb; diff --git a/mac/tclMacPort.h b/mac/tclMacPort.h index 50db085..d0edfb6 100644 --- a/mac/tclMacPort.h +++ b/mac/tclMacPort.h @@ -262,5 +262,7 @@ void TclUnsetEnv(CONST char *name); EXTERN int TclpSameFile _ANSI_ARGS_((char *file1, char *file2, struct stat *sourceStatBufPtr, struct stat *destStatBufPtr)) ; +EXTERN int TclpStat _ANSI_ARGS_ ((CONST char *path, struct stat *buf)); +EXTERN int TclpAccess _ANSI_ARGS_ ((CONST char *path, int mode)); #endif /* _MACPORT */ |