Added pre compiled header common to all Mac Tcl projects. This

was supplied by Jom Ingham.


FossilOrigin-Name: fd43f64afd16a1dbbfc92acd97d834563e90e5de

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