diff options
| -rw-r--r-- | mac/MW_TclHeader.pch | 14 | ||||
| -rw-r--r-- | mac/tclMacFile.c | 2 | ||||
| -rw-r--r-- | mac/tclMacPort.h | 2 | ||||
| -rw-r--r-- | unix/configure.in | 4 |
4 files changed, 18 insertions, 4 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 */ diff --git a/unix/configure.in b/unix/configure.in index 21b9867..5b87d37 100644 --- a/unix/configure.in +++ b/unix/configure.in @@ -2,12 +2,12 @@ dnl This file is an input file used by the GNU "autoconf" program to dnl generate the file "configure", which is run during Tcl installation dnl to configure the system for the local environment. AC_INIT(../generic/tcl.h) -# SCCS: %Z% $Id: configure.in,v 1.4 1998/07/01 19:17:08 escoffon Exp $ +# SCCS: %Z% $Id: configure.in,v 1.5 1998/07/06 22:14:09 welch Exp $ TCL_VERSION=8.0 TCL_MAJOR_VERSION=8 TCL_MINOR_VERSION=0 -TCL_PATCH_LEVEL=".3" +TCL_PATCH_LEVEL=".3-2" VERSION=${TCL_VERSION} if test "${prefix}" = "NONE"; then |