summaryrefslogtreecommitdiffstats
path: root/mac
diff options
context:
space:
mode:
Diffstat (limited to 'mac')
-rw-r--r--mac/MW_TclHeader.pch14
-rw-r--r--mac/tclMacFile.c2
-rw-r--r--mac/tclMacPort.h2
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 */