summaryrefslogtreecommitdiffstats
path: root/mac
diff options
context:
space:
mode:
Diffstat (limited to 'mac')
-rw-r--r--mac/MW_TclAppleScriptHeader.pch3
-rwxr-xr-xmac/tclMacCommonPch.h88
2 files changed, 90 insertions, 1 deletions
diff --git a/mac/MW_TclAppleScriptHeader.pch b/mac/MW_TclAppleScriptHeader.pch
index 988b4ff..bf130ab 100644
--- a/mac/MW_TclAppleScriptHeader.pch
+++ b/mac/MW_TclAppleScriptHeader.pch
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: MW_TclAppleScriptHeader.pch,v 1.2 1998/09/14 18:40:03 stanton Exp $
+ * RCS: @(#) $Id: MW_TclAppleScriptHeader.pch,v 1.3 1998/11/10 16:30:35 rjohnson Exp $
*/
/*
@@ -22,6 +22,7 @@
* architecture we are compiling for (see the code below). For
* example, for a 68k app the prefix file should be: MW_TclHeader68K.
*/
+
#if __POWERPC__
#pragma precompile_target "MW_TclAppleScriptHeaderPPC"
#include "MW_TclHeaderPPC"
diff --git a/mac/tclMacCommonPch.h b/mac/tclMacCommonPch.h
new file mode 100755
index 0000000..ec6d0d3
--- /dev/null
+++ b/mac/tclMacCommonPch.h
@@ -0,0 +1,88 @@
+/*
+ * tclMacCommonPch.h --
+ *
+ * Macintosh Tcl must be compiled with certain compiler options to
+ * ensure that it will work correctly. The following pragmas are
+ * used to ensure that those options are set correctly. An error
+ * will occur at compile time if they are not set correctly.
+ *
+ * Copyright (c) 1998 by Scriptics Corporation.
+ *
+ * See the file "license.terms" for information on usage and redistribution
+ * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
+ *
+ * RCS: @(#) $Id: tclMacCommonPch.h,v 1.1 1998/11/10 16:30:36 rjohnson Exp $
+ */
+
+#if !__option(enumsalwaysint)
+#error Tcl requires the Metrowerks setting "Enums always ints".
+#endif
+
+
+#if !defined(__POWERPC__)
+#if !__option(far_data)
+#error Tcl requires the Metrowerks setting "Far data".
+#endif
+#endif
+
+
+#if !defined(__POWERPC__)
+#if !__option(fourbyteints)
+#error Tcl requires the Metrowerks setting "4 byte ints".
+#endif
+#endif
+
+
+#if !defined(__POWERPC__)
+#if !__option(IEEEdoubles)
+#error Tcl requires the Metrowerks setting "8 byte doubles".
+#endif
+#endif
+
+
+/*
+* The define is used most everywhere to tell Tcl (or any Tcl
+* extensions) that we are compiling for the Macintosh platform.
+*/
+
+
+#define MAC_TCL
+
+
+/*
+* The following defines control the behavior of the Macintosh
+* Universial Headers.
+*/
+
+
+#define SystemSevenOrLater 1
+#define STRICT_CONTROLS 1
+#define STRICT_WINDOWS 1
+
+
+/*
+* Define the following symbol if you want
+* comprehensive debugging turned on.
+*/
+
+
+#define TCL_DEBUG
+
+
+#ifdef TCL_DEBUG
+# define TCL_MEM_DEBUG
+# define TCL_TEST
+#endif
+
+
+
+/*
+* For a while, we will continue to use the old routine names, so that
+* people with older versions of CodeWarrior will still be able to compile
+* the source (albeit they will have to update the project files themselves).
+*
+* At some point, we will convert over to the new routine names.
+*/
+
+
+#define OLDROUTINENAMES 1