Initial revision

diff --git a/Mac/Python/macgetcompiler.c b/Mac/Python/macgetcompiler.c
new file mode 100644 (file)
index 0000000..b249d67
--- /dev/null
+++ b/Mac/Python/macgetcompiler.c
@@ -0,0 +1,27 @@
+/* Return a string representing the compiler name */
+
+#ifdef THINK_C
+#define COMPILER " [THINK C]"
+#endif
+
+#ifdef __MWERKS__
+#ifdef __powerc
+#define COMPILER " [CW PPC]"
+#else
+#define COMPILER " [CW 68K]"
+#endif
+#endif
+
+#ifdef MPW
+#ifdef __SC__
+#define COMPILER " [Symantec MPW]"
+#else
+#define COMPILER " [Apple MPW]"
+#endif
+#endif
+
+char *
+getcompiler()
+{
+       return COMPILER;
+}