It was an old MacPython artefact that these files were still in the source

tree. Removed them, anyone really desparate to recover them can get them
from the CVS repository.

22 files changed, 0 insertions, 4128 deletions

diff --git a/Mac/Unsupported/Classic/Printingmodule.c b/Mac/Unsupported/Classic/Printingmodule.c
deleted file mode 100644
index e0c4017..0000000
--- a/Mac/Unsupported/Classic/Printingmodule.c
+++ /dev/null
@@ -1,465 +0,0 @@
-/******************************************************************
-Copyright 1998 by Just van Rossum, Den Haag, The Netherlands.
-
-                        All Rights Reserved
-
-Permission to use, copy, modify, and distribute this software and its
-documentation for any purpose and without fee is hereby granted,
-provided that the above copyright notice appear in all copies and that
-both that copyright notice and this permission notice appear in
-supporting documentation, and that the name of Just van Rossum not be 
-used in advertising or publicity pertaining to distribution of the 
-software without specific, written prior permission.
-
-JUST VAN ROSSUM DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, 
-INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO 
-EVENT SHALL JUST VAN ROSSUM BE LIABLE FOR ANY SPECIAL, INDIRECT OR 
-CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF 
-USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR 
-OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
-PERFORMANCE OF THIS SOFTWARE.
-
-******************************************************************/
-
-#include "Python.h"
-#include "macglue.h"
-#include "pymactoolbox.h"
-#include <Printing.h>
-
-static PyObject *ErrorObject;
-
-/* ----------------------------------------------------- */
-
-static int
-TPRect_Convert(PyObject *v, TPRect *r)
-{
-	if (v == Py_None) {
-		*r = NULL;
-		return 1;
-	}
-	return PyArg_Parse(v, "(hhhh)", &(*r)->left, &(*r)->top, &(*r)->right, &(*r)->bottom);
-}
-
-
-static char Pr_NewTPrintRecord__doc__[] =
-"creates a new TPrint handle"
-;
-
-static PyObject *
-Pr_NewTPrintRecord(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	Handle hPrint;
-
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	hPrint = NewHandleClear((long) sizeof(TPrint));
-	if ( hPrint == NULL ) {
-		PyErr_NoMemory();
-		return NULL;
-	}
-	return (PyObject *)ResObj_New(hPrint);
-}
-
-static char Pr_PrPurge__doc__[] =
-"PrPurge() -> None"
-;
-
-static PyObject *
-Pr_PrPurge(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	PrPurge();
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrNoPurge__doc__[] =
-"PrNoPurge() -> None"
-;
-
-static PyObject *
-Pr_PrNoPurge(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	PrNoPurge();
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrOpen__doc__[] =
-"PrOpen() -> None"
-;
-
-static PyObject *
-Pr_PrOpen(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	PrOpen();
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrClose__doc__[] =
-"PrClose() -> None"
-;
-
-static PyObject *
-Pr_PrClose(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	PrClose();
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrintDefault__doc__[] =
-"PrintDefault(THPrint hPrint) -> None"
-;
-
-static PyObject *
-Pr_PrintDefault(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrint;
-
-	if (!PyArg_ParseTuple(args, "O&", ResObj_Convert, &hPrint))
-		return NULL;
-	PrintDefault(hPrint);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrValidate__doc__[] =
-"PrValidate(THPrint hPrint) -> None"
-;
-
-static PyObject *
-Pr_PrValidate(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrint;
-
-	if (!PyArg_ParseTuple(args, "O&", ResObj_Convert, &hPrint))
-		return NULL;
-	PrValidate(hPrint);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrStlDialog__doc__[] =
-"PrStlDialog(THPrint hPrint) -> Boolean"
-;
-
-static PyObject *
-Pr_PrStlDialog(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrint;
-	Boolean rv;
-	
-	if (!PyArg_ParseTuple(args, "O&", ResObj_Convert, &hPrint))
-		return NULL;
-	rv = PrStlDialog(hPrint);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	return Py_BuildValue("h", rv);
-}
-
-static char Pr_PrJobDialog__doc__[] =
-"PrJobDialog(THPrint hPrint) -> Boolean"
-;
-
-static PyObject *
-Pr_PrJobDialog(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrint;
-	Boolean rv;
-
-	if (!PyArg_ParseTuple(args, "O&", ResObj_Convert, &hPrint))
-		return NULL;
-	rv = PrJobDialog(hPrint);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	return Py_BuildValue("h", rv);
-}
-
-static char Pr_PrJobMerge__doc__[] =
-"PrJobMerge(THPrint hPrintSrc, THPrint hPrintDst) -> none"
-;
-
-static PyObject *
-Pr_PrJobMerge(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrintSrc, hPrintDst;
-
-	if (!PyArg_ParseTuple(args, "O&O&", ResObj_Convert, &hPrintSrc, ResObj_Convert, &hPrintDst))
-		return NULL;
-	PrJobMerge(hPrintSrc, hPrintDst);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrOpenDoc__doc__[] =
-"PrOpenDoc(THPrint hPrint) -> TPPrPort aTPPort"
-;
-
-static PyObject *
-Pr_PrOpenDoc(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrint;
-	TPPrPort aTPPort;
-
-	if (!PyArg_ParseTuple(args, "O&", ResObj_Convert, &hPrint))
-		return NULL;
-	aTPPort = PrOpenDoc(hPrint, NULL, NULL);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	return Py_BuildValue("O&", GrafObj_New, aTPPort);
-}
-
-static char Pr_PrCloseDoc__doc__[] =
-"PrCloseDoc(TPPrPort pPrPort) -> None"
-;
-
-static PyObject *
-Pr_PrCloseDoc(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	TPPrPort pPrPort;
-	
-	if (!PyArg_ParseTuple(args, "O&", GrafObj_Convert, &pPrPort))
-		return NULL;
-	PrCloseDoc(pPrPort);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrOpenPage__doc__[] =
-"PrOpenPage(TPPrPort pPrPort, TPRect pPageFrame) -> None"
-;
-
-static PyObject *
-Pr_PrOpenPage(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	TPPrPort pPrPort;
-	Rect dummyrect = {0, 0, 0, 0};
-	TPRect pPageFrame = &dummyrect;
-	
-	if (!PyArg_ParseTuple(args, "O&O&", GrafObj_Convert, &pPrPort, TPRect_Convert, &pPageFrame))
-		return NULL;
-	PrOpenPage(pPrPort, pPageFrame);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrClosePage__doc__[] =
-"PrClosePage(TPPrPort pPrPort) -> None"
-;
-
-static PyObject *
-Pr_PrClosePage(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	TPPrPort pPrPort;
-
-	if (!PyArg_ParseTuple(args, "O&", GrafObj_Convert, &pPrPort))
-		return NULL;
-	PrClosePage(pPrPort);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrPicFile__doc__[] =
-"PrPicFile(THPrint hPrint) -> none"
-;
-
-static PyObject *
-Pr_PrPicFile(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	THPrint hPrint;
-	TPrStatus prStatus;
-	
-	if (!PyArg_ParseTuple(args, "O&", ResObj_Convert, &hPrint))
-		return NULL;
-	PrPicFile(hPrint, NULL, NULL, NULL, &prStatus);
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrGeneral__doc__[] =
-"not implemented"
-;
-
-static PyObject *
-Pr_PrGeneral(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	//PrGeneral();
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static char Pr_PrDrvrVers__doc__[] =
-"PrDrvrVers() -> version"
-;
-
-static PyObject *
-Pr_PrDrvrVers(self, args)
-	PyObject *self;	/* Not used */
-	PyObject *args;
-{
-	short rv;
-	
-	if (!PyArg_ParseTuple(args, ""))
-		return NULL;
-	rv = PrDrvrVers();
-	{
-		OSErr _err = PrError();
-		if (_err != noErr) return PyMac_Error(_err);
-	}
-	return Py_BuildValue("h", rv);
-}
-
-/* List of methods defined in the module */
-
-static struct PyMethodDef Pr_methods[] = {
-	{"NewTPrintRecord", (PyCFunction)Pr_NewTPrintRecord, METH_VARARGS, Pr_NewTPrintRecord__doc__},
-	{"PrPurge",		(PyCFunction)Pr_PrPurge,		METH_VARARGS,	Pr_PrPurge__doc__},
-	{"PrNoPurge",	(PyCFunction)Pr_PrNoPurge,		METH_VARARGS,	Pr_PrNoPurge__doc__},
-	{"PrOpen",		(PyCFunction)Pr_PrOpen,			METH_VARARGS,	Pr_PrOpen__doc__},
-	{"PrClose",		(PyCFunction)Pr_PrClose,		METH_VARARGS,	Pr_PrClose__doc__},
-	{"PrintDefault",(PyCFunction)Pr_PrintDefault,	METH_VARARGS,	Pr_PrintDefault__doc__},
-	{"PrValidate",	(PyCFunction)Pr_PrValidate,		METH_VARARGS,	Pr_PrValidate__doc__},
-	{"PrStlDialog",	(PyCFunction)Pr_PrStlDialog,	METH_VARARGS,	Pr_PrStlDialog__doc__},
-	{"PrJobDialog",	(PyCFunction)Pr_PrJobDialog,	METH_VARARGS,	Pr_PrJobDialog__doc__},
-	{"PrJobMerge",	(PyCFunction)Pr_PrJobMerge,		METH_VARARGS,	Pr_PrJobMerge__doc__},
-	{"PrOpenDoc",	(PyCFunction)Pr_PrOpenDoc,		METH_VARARGS,	Pr_PrOpenDoc__doc__},
-	{"PrCloseDoc",	(PyCFunction)Pr_PrCloseDoc,		METH_VARARGS,	Pr_PrCloseDoc__doc__},
-	{"PrOpenPage",	(PyCFunction)Pr_PrOpenPage,		METH_VARARGS,	Pr_PrOpenPage__doc__},
-	{"PrClosePage",	(PyCFunction)Pr_PrClosePage,	METH_VARARGS,	Pr_PrClosePage__doc__},
-	{"PrPicFile",	(PyCFunction)Pr_PrPicFile,		METH_VARARGS,	Pr_PrPicFile__doc__},
-//	{"PrGeneral",	(PyCFunction)Pr_PrGeneral,		METH_VARARGS,	Pr_PrGeneral__doc__},
-	{"PrDrvrVers",	(PyCFunction)Pr_PrDrvrVers,		METH_VARARGS,	Pr_PrDrvrVers__doc__},
-	
-	{NULL,	(PyCFunction)NULL, 0, NULL}		/* sentinel */
-};
-
-
-/* Initialization function for the module (*must* be called initPrinting) */
-
-static char Printing_module_documentation[] = 
-""
-;
-
-void initPrinting();
-
-void
-initPrinting()
-{
-	PyObject *m, *d;
-
-	/* Create the module and add the functions */
-	m = Py_InitModule4("Printing", Pr_methods,
-		Printing_module_documentation,
-		(PyObject*)NULL,PYTHON_API_VERSION);
-
-	/* Add some symbolic constants to the module */
-	d = PyModule_GetDict(m);
-	ErrorObject = PyString_FromString("Printing.error");
-	PyDict_SetItemString(d, "error", ErrorObject);
-
-	/* XXXX Add constants here */
-	
-}
-
diff --git a/Mac/Unsupported/Classic/README b/Mac/Unsupported/Classic/README
deleted file mode 100644
index 531d9f0..0000000
--- a/Mac/Unsupported/Classic/README
+++ /dev/null
@@ -1,2 +0,0 @@
-These modules no longer work under Carbon. If you are trying to revive
-non-carbon builds of MacPython you may want to revive them.
diff --git a/Mac/Unsupported/Classic/macspeechmodule.c b/Mac/Unsupported/Classic/macspeechmodule.c
deleted file mode 100644
index a8388e9..0000000
--- a/Mac/Unsupported/Classic/macspeechmodule.c
+++ /dev/null
@@ -1,546 +0,0 @@
-/***********************************************************
-Copyright 1991-1997 by Stichting Mathematisch Centrum, Amsterdam,
-The Netherlands.
-
-                        All Rights Reserved
-
-Permission to use, copy, modify, and distribute this software and its 
-documentation for any purpose and without fee is hereby granted, 
-provided that the above copyright notice appear in all copies and that
-both that copyright notice and this permission notice appear in 
-supporting documentation, and that the names of Stichting Mathematisch
-Centrum or CWI not be used in advertising or publicity pertaining to
-distribution of the software without specific, written prior permission.
-
-STICHTING MATHEMATISCH CENTRUM DISCLAIMS ALL WARRANTIES WITH REGARD TO
-THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND
-FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH CENTRUM BE LIABLE
-FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
-WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
-ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
-OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
-
-******************************************************************/
-
-
-#include "Python.h"
-#include "macglue.h"
-
-#include <Gestalt.h>
-#include "Speech.h"
-
-#ifdef __MWERKS__
-#define OLDP2C 1
-#include <TextUtils.h>
-#ifndef c2pstr
-#define c2pstr C2PStr
-#endif
-#ifndef p2cstr
-#define p2cstr P2CStr
-#endif
-#else
-#include "pascal.h"
-#endif /* __MWERKS__ */
-
-#include <CodeFragments.h>
-int lib_available;
-
-/* Somehow the Apple Fix2X and X2Fix don't do what I expect */
-#define fixed2double(x) (((double)(x))/32768.0)
-#define double2fixed(x) ((Fixed)((x)*32768.0))
-
-char *CurrentSpeech;
-PyObject *ms_error_object;
-int speech_available;
-
-static
-init_available() {
-	OSErr err;
-	long result;
-
-	lib_available = ((ProcPtr)SpeakString != (ProcPtr)0);
-	err = Gestalt(gestaltSpeechAttr, &result);
-	if ( err == noErr && (result & (1<<gestaltSpeechMgrPresent)))
-		return 1;
-	return 0;
-}
-
-static
-check_available() {
-	if ( !speech_available ) {
-		PyErr_SetString(ms_error_object, "Speech Mgr not available");
-		return 0;
-	}
-	if ( !lib_available ) {
-		PyErr_SetString(ms_error_object, "Speech Mgr available, but shared lib missing");
-		return 0;
-	}
-	return 1;
-}
-
-/* -------------
-**
-** Part one - the speech channel object
-*/
-typedef struct {
-	PyObject_HEAD
-	SpeechChannel chan;
-	PyObject *curtext;	/* If non-NULL current text being spoken */
-} scobject;
-
-static PyTypeObject sctype;
-
-#define is_scobject(v)		((v)->ob_type == &sctype)
-
-static scobject *
-newscobject(arg)
-	VoiceSpec *arg;
-{
-	scobject *self;
-	OSErr err;
-	
-	self = PyObject_NEW(scobject, &sctype);
-	if (self == NULL)
-		return NULL;
-	if ( (err=NewSpeechChannel(arg, &self->chan)) != 0) {
-		Py_DECREF(self);
-		return (scobject *)PyErr_Mac(ms_error_object, err);
-	}
-	self->curtext = NULL;
-	return self;
-}
-
-/* sc methods */
-
-static void
-sc_dealloc(self)
-	scobject *self;
-{
-	DisposeSpeechChannel(self->chan);
-	PyObject_DEL(self);
-}
-
-static PyObject *
-sc_Stop(self, args)
-	scobject *self;
-	PyObject *args;
-{
-	OSErr err;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if ((err=StopSpeech(self->chan)) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return NULL;
-	}
-	if ( self->curtext ) {
-		Py_DECREF(self->curtext);
-		self->curtext = NULL;
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static PyObject *
-sc_SpeakText(self, args)
-	scobject *self;
-	PyObject *args;
-{
-	OSErr err;
-	char *str;
-	int len;
-	
-	if (!PyArg_Parse(args, "s#", &str, &len))
-		return NULL;
-	if ( self->curtext ) {
-		StopSpeech(self->chan);
-		Py_DECREF(self->curtext);
-		self->curtext = NULL;
-	}
-	if ((err=SpeakText(self->chan, (Ptr)str, (long)len)) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return 0;
-	}
-	(void)PyArg_Parse(args, "O", &self->curtext);	/* Or should I check this? */
-	Py_INCREF(self->curtext);
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static PyObject *
-sc_GetRate(self, args)
-	scobject *self;
-	PyObject *args;
-{
-	OSErr err;
-	Fixed farg;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if ((err=GetSpeechRate(self->chan, &farg)) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return 0;
-	}
-	return PyFloat_FromDouble(fixed2double(farg));
-}
-
-static PyObject *
-sc_GetPitch(self, args)
-	scobject *self;
-	PyObject *args;
-{
-	OSErr err;
-	Fixed farg;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if ((err=GetSpeechPitch(self->chan, &farg)) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return 0;
-	}
-	return PyFloat_FromDouble(fixed2double(farg));
-}
-
-static PyObject *
-sc_SetRate(self, args)
-	scobject *self;
-	PyObject *args;
-{
-	OSErr err;
-	double darg;
-	
-	if (!PyArg_Parse(args, "d", &darg))
-		return NULL;
-	if ((err=SetSpeechRate(self->chan, double2fixed(darg))) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return 0;
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static PyObject *
-sc_SetPitch(self, args)
-	scobject *self;
-	PyObject *args;
-{
-	OSErr err;
-	double darg;
-	
-	if (!PyArg_Parse(args, "d", &darg))
-		return NULL;
-	if ((err=SetSpeechPitch(self->chan, double2fixed(darg))) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return NULL;
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-static struct PyMethodDef sc_methods[] = {
-	{"Stop",		(PyCFunction)sc_Stop},
-	{"SetRate",		(PyCFunction)sc_SetRate},
-	{"GetRate",		(PyCFunction)sc_GetRate},
-	{"SetPitch",	(PyCFunction)sc_SetPitch},
-	{"GetPitch",	(PyCFunction)sc_GetPitch},
-	{"SpeakText",	(PyCFunction)sc_SpeakText},
-	{NULL,			NULL}		/* sentinel */
-};
-
-static PyObject *
-sc_getattr(self, name)
-	scobject *self;
-	char *name;
-{
-	return Py_FindMethod(sc_methods, (PyObject *)self, name);
-}
-
-static PyTypeObject sctype = {
-	PyObject_HEAD_INIT(&PyType_Type)
-	0,			/*ob_size*/
-	"macspeech.MacSpeechChannel", /*tp_name*/
-	sizeof(scobject),	/*tp_basicsize*/
-	0,			/*tp_itemsize*/
-	/* methods */
-	(destructor)sc_dealloc, /*tp_dealloc*/
-	0,			/*tp_print*/
-	(getattrfunc)sc_getattr, /*tp_getattr*/
-	0, 			/*tp_setattr*/
-	0,			/*tp_compare*/
-	0,			/*tp_repr*/
-	0,			/*tp_as_number*/
-	0,			/*tp_as_sequence*/
-	0,			/*tp_as_mapping*/
-	0,			/*tp_hash*/
-};
-
-/* -------------
-**
-** Part two - the voice object
-*/
-typedef struct {
-	PyObject_HEAD
-	int		initialized;
-	VoiceSpec	vs;
-	VoiceDescription vd;
-} mvobject;
-
-static PyTypeObject mvtype;
-
-#define is_mvobject(v)		((v)->ob_type == &mvtype)
-
-static mvobject *
-newmvobject()
-{
-	mvobject *self;
-	self = PyObject_NEW(mvobject, &mvtype);
-	if (self == NULL)
-		return NULL;
-	self->initialized = 0;
-	return self;
-}
-
-static int
-initmvobject(self, ind)
-	mvobject *self;
-	int ind;
-{
-	OSErr err;
-	
-	if ( (err=GetIndVoice((short)ind, &self->vs)) != 0 ) {
-		PyErr_Mac(ms_error_object, err);
-		return 0;
-	}
-	if ( (err=GetVoiceDescription(&self->vs, &self->vd, sizeof self->vd)) != 0) {
-		PyErr_Mac(ms_error_object, err);
-		return 0;
-	}
-	self->initialized = 1;
-	return 1;
-} 
-/* mv methods */
-
-static void
-mv_dealloc(self)
-	mvobject *self;
-{
-	PyObject_DEL(self);
-}
-
-static PyObject *
-mv_getgender(self, args)
-	mvobject *self;
-	PyObject *args;
-{
-	PyObject *rv;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if (!self->initialized) {
-		PyErr_SetString(ms_error_object, "Uninitialized voice");
-		return NULL;
-	}
-	rv = PyInt_FromLong(self->vd.gender);
-	return rv;
-}
-
-static PyObject *
-mv_newchannel(self, args)
-	mvobject *self;
-	PyObject *args;
-{	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if (!self->initialized) {
-		PyErr_SetString(ms_error_object, "Uninitialized voice");
-		return NULL;
-	}
-	return (PyObject *)newscobject(&self->vs);
-}
-
-static struct PyMethodDef mv_methods[] = {
-	{"GetGender",	(PyCFunction)mv_getgender},
-	{"NewChannel",	(PyCFunction)mv_newchannel},
-	{NULL,		NULL}		/* sentinel */
-};
-
-static PyObject *
-mv_getattr(self, name)
-	mvobject *self;
-	char *name;
-{
-	return Py_FindMethod(mv_methods, (PyObject *)self, name);
-}
-
-static PyTypeObject mvtype = {
-	PyObject_HEAD_INIT(&PyType_Type)
-	0,			/*ob_size*/
-	"macspeech.MacVoice",	/*tp_name*/
-	sizeof(mvobject),	/*tp_basicsize*/
-	0,			/*tp_itemsize*/
-	/* methods */
-	(destructor)mv_dealloc, /*tp_dealloc*/
-	0,			/*tp_print*/
-	(getattrfunc)mv_getattr, /*tp_getattr*/
-	0,			/*tp_setattr*/
-	0,			/*tp_compare*/
-	0,			/*tp_repr*/
-	0,			/*tp_as_number*/
-	0,			/*tp_as_sequence*/
-	0,			/*tp_as_mapping*/
-	0,			/*tp_hash*/
-};
-
-
-/* -------------
-**
-** Part three - The module interface
-*/
-
-/* See if Speech manager available */
-
-static PyObject *
-ms_Available(self, args)
-	PyObject *self; /* Not used */
-	PyObject *args;
-{
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	return PyInt_FromLong(speech_available);
-}
-
-/* Count number of busy speeches */
-
-static PyObject *
-ms_Busy(self, args)
-	PyObject *self; /* Not used */
-	PyObject *args;
-{
-	short result;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if ( !check_available() )
-		return NULL;
-	result = SpeechBusy();
-	return PyInt_FromLong(result);
-}
-
-/* Say something */
-
-static PyObject *
-ms_SpeakString(self, args)
-	PyObject *self; /* Not used */
-	PyObject *args;
-{
-	OSErr err;
-	char *str;
-	int len;
-	
-	if (!PyArg_Parse(args, "s", &str))
-		return NULL;
-	if ( !check_available())
-		return NULL;
-	if (CurrentSpeech) {
-		/* Free the old speech, after killing it off
-		** (note that speach is async and c2pstr works inplace)
-		*/
-		SpeakString("\p");
-		free(CurrentSpeech);
-	}
-	len = strlen(str);
-	CurrentSpeech = malloc(len+1);
-	strcpy(CurrentSpeech, str);
-	err = SpeakString(c2pstr(CurrentSpeech));
-	if ( err ) {
-		PyErr_Mac(ms_error_object, err);
-		return NULL;
-	}
-	Py_INCREF(Py_None);
-	return Py_None;
-}
-
-
-/* Count number of available voices */
-
-static PyObject *
-ms_CountVoices(self, args)
-	PyObject *self; /* Not used */
-	PyObject *args;
-{
-	short result;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if ( !check_available())
-		return NULL;
-	CountVoices(&result);
-	return PyInt_FromLong(result);
-}
-
-static PyObject *
-ms_GetIndVoice(self, args)
-	PyObject *self; /* Not used */
-	PyObject *args;
-{
-	mvobject *rv;
-	long ind;
-	
-	if( !PyArg_Parse(args, "i", &ind))
-		return NULL;
-	if ( !check_available() )
-		return NULL;
-	rv = newmvobject();
-	if ( !initmvobject(rv, ind) ) {
-		Py_DECREF(rv);
-		return NULL;
-	}
-	return (PyObject *)rv;
-}
-
-
-static PyObject *
-ms_Version(self, args)
-	PyObject *self; /* Not used */
-	PyObject *args;
-{
-	NumVersion v;
-	
-	if (!PyArg_NoArgs(args))
-		return NULL;
-	if ( !check_available())
-		return NULL;
-	v = SpeechManagerVersion();
-	return PyInt_FromLong(*(int *)&v);
-}
-
-
-/* List of functions defined in the module */
-
-static struct PyMethodDef ms_methods[] = {
-	{"Available",	ms_Available},
-	{"CountVoices",	ms_CountVoices},
-	{"Busy",		ms_Busy},
-	{"SpeakString",	ms_SpeakString},
-	{"GetIndVoice", ms_GetIndVoice},
-	{"Version",		ms_Version},
-	{NULL,		NULL}		/* sentinel */
-};
-
-/* Initialization function for the module (*must* be called initmacspeech) */
-
-void
-initmacspeech()
-{
-	PyObject *m, *d;
-
-	speech_available = init_available();
-	/* Create the module and add the functions */
-	m = Py_InitModule("macspeech", ms_methods);
-
-	/* Add some symbolic constants to the module */
-	d = PyModule_GetDict(m);
-	ms_error_object = PyErr_NewException("macspeech.error", NULL, NULL);
-	PyDict_SetItemString(d, "error", ms_error_object);
-}
diff --git a/Mac/Unsupported/FixCreator.py b/Mac/Unsupported/FixCreator.py
deleted file mode 100644
index b5b3a26..0000000
--- a/Mac/Unsupported/FixCreator.py
+++ /dev/null
@@ -1,36 +0,0 @@
-#
-# FixCreator - Search for files with PYTH creator
-# and set it to Pyth.
-#
-import os
-import macfs
-import sys
-import macostools
-
-OLD='PYTH'
-NEW='Pyth'
-
-def walktree(name, change):
-	if os.path.isfile(name):
-		fs = macfs.FSSpec(name)
-		cur_cr, cur_tp = fs.GetCreatorType()
-		if cur_cr == OLD:
-			fs.SetCreatorType(NEW, cur_tp)
-			macostools.touched(fs)
-			print 'Fixed ', name
-	elif os.path.isdir(name):
-		print '->', name
-		files = os.listdir(name)
-		for f in files:
-			walktree(os.path.join(name, f), change)
-			
-def run(change):
-	fss, ok = macfs.GetDirectory('Folder to search:')
-	if not ok:
-		sys.exit(0)
-	walktree(fss.as_pathname(), change)
-	
-if __name__ == '__main__':
-	run(1)
-	
-	
diff --git a/Mac/Unsupported/PackLibDir.py b/Mac/Unsupported/PackLibDir.py
deleted file mode 100644
index ba689e6..0000000
--- a/Mac/Unsupported/PackLibDir.py
+++ /dev/null
@@ -1,49 +0,0 @@
-#
-# Turn a pyc file into a resource file containing it in 'PYC ' resource form
-from Carbon.Res import *
-from Carbon import Res
-from Carbon.Resources import *
-import os
-import macfs
-import sys
-import py_resource
-
-error = 'mkpycresourcefile.error'
-
-def mkpycresourcefile(src, dst):
-	"""Copy pyc file/dir src to resource file dst."""
-	
-	if not os.path.isdir(src) and src[-4:] <> '.pyc':
-			raise error, 'I can only handle .pyc files or directories'
-	fsid = py_resource.create(dst)
-	if os.path.isdir(src):
-		handlesubdir(src)
-	else:
-		id, name = py_resource.frompycfile(src)
-		print 'Wrote %d: %s %s'%(id, name, src)
-	CloseResFile(fsid)
-			
-def handlesubdir(srcdir):
-	"""Recursively scan a directory for pyc files and copy to resources"""
-	src = os.listdir(srcdir)
-	for file in src:
-		file = os.path.join(srcdir, file)
-		if os.path.isdir(file):
-			handlesubdir(file)
-		elif file[-4:] == '.pyc':
-			id, name = py_resource.frompycfile(file)
-			print 'Wrote %d: %s %s'%(id, name, file)
-	
-if __name__ == '__main__':
-	args = sys.argv[1:]
-	if not args:
-		ifss, ok = macfs.GetDirectory('Select root of tree to pack:')
-		if not ok:
-			sys.exit(0)
-		args = [ifss.as_pathname()]
-	for ifn in args:
-		ofss, ok = macfs.StandardPutFile('Output for '+os.path.split(ifn)[1])
-		if not ok:
-			sys.exit(0)
-		mkpycresourcefile(ifn, ofss.as_pathname())
-	sys.exit(1)			# So we can see something...
diff --git a/Mac/Unsupported/PackLibDir.rsrc b/Mac/Unsupported/PackLibDir.rsrc
deleted file mode 100644
index bcdbf0b..0000000
--- a/Mac/Unsupported/PackLibDir.rsrc
+++ /dev/null
diff --git a/Mac/Unsupported/PythonScript/PyScriptTest.py b/Mac/Unsupported/PythonScript/PyScriptTest.py
deleted file mode 100644
index fee3203..0000000
--- a/Mac/Unsupported/PythonScript/PyScriptTest.py
+++ /dev/null
@@ -1,25 +0,0 @@
-'''
-Minimal test module
-'''#
-
-import sys
-import PythonScript
-
-SIGNATURE = 'MACS'
-TIMEOUT = 10*60*60
-
-PythonScript.PsScript(SIGNATURE, TIMEOUT)
-p = PythonScript.PyScript
-ev = PythonScript.PsEvents
-pc = PythonScript.PsClass
-pp = PythonScript.PsProperties
-
-startup = str(p(ev.Get, pc.Desktopobject(1).Startup_disk().Name()))
-print 'startup',startup, type(startup)
-print p(ev.Get, pc.Disk(startup).Folder(7).File(1).Name())
-print p(ev.Get, pc.Disk(1).Name())
-print p(ev.Get, pc.Disk('every').Name())
-print p(ev.Make, None, New='Alias_file', At=pp.Desktop(''), To=pp.System_folder(1))
-
-sys.exit(1)
-	
diff --git a/Mac/Unsupported/PythonScript/PythonScript.py b/Mac/Unsupported/PythonScript/PythonScript.py
deleted file mode 100644
index 731db98..0000000
--- a/Mac/Unsupported/PythonScript/PythonScript.py
+++ /dev/null
@@ -1,301 +0,0 @@
-"""
-Python script a module to comunicate with apple events
-
-v 0.1a2
-v.0.2 16 april 1998 
-
-
-"""
-import sys
-import getaete
-import baetools
-import baetypes
-from Carbon import AE
-import AppleEvents
-import macfs
-from types import *
-#from aetypes import InstanceType
-from aepack import AEDescType
-
-ordinal = {
-'every': 'all ',
-'first' : 'firs',
-'last' : 'last',
-'any' : 'any ',
-'middle' : 'midd'}
-
-
-Error = 'PythonScript.Error'
-
-
-class PsEvents:
-	pass
-
-
-class PsClasses:
-
-	
-	def __getattr__(self, name):
-		try:
-			return DCItem(name, self)
-		except:
-			pass
-		
-	def __repr__(self):
-		if self.form != 'prop':
-			t = type(self.seld)
-			if t == StringType:
-				self.form = 'name'
-			elif baetypes.IsRange(self.seld):
-				self.form = 'rang'
-			elif baetypes.IsComparison(self.seld) or baetypes.IsLogical(self.seld):
-				self.form = 'test'
-			elif t == TupleType:
-			# Breakout: specify both form and seld in a tuple
-			# (if you want ID or rele or somesuch)
-				self.form, self.seld = self.seld
-			elif t == IntType:
-				self.form = 'indx'
-			else:
-				pass
-
-		if self.seld in ordinal.keys():
-			self.seld = baetypes.Ordinal(ordinal[self.seld])
-			self.form = 'indx'
-
-		s = "baetypes.ObjectSpecifier(%s, %s, %s" % (`self.want`, `self.form`, `self.seld`)
-		if `self.fr`:
-			s = s + ", %s)" % `self.fr`
-		else:
-			s = s + ")"
-		return s
-		
-	def __str__(self):
-		return self.want
-		
-		
-def template(self, seld=None, fr=None):
-	self.seld = seld
-	self.fr = fr
-		
-def template1(self, which, fr=None):
-	self.want = 'prop'
-	self.form = 'prop'
-	self.fr = fr
-	
-class DCItem:
-	def __init__(self, comp, fr):
-		self.compclass = comp
-		self.fr = fr
-		
-	def __call__(self, which=None):
-		if which:
-			self.compclass = eval('PsClass.%s' % self.compclass)
-		else:
-			try:
-				self.compclass = eval('PsProperties.%s' % self.compclass)
-			except AttributeError:
-				self.compclass = eval('PsClass.%s' % self.compclass)
-		return self.compclass(which, self.fr)
-
-class PsClass:
-	pass
-
-class PsProperties:
-	pass				
-
-
-class PsEnumerations:
-	pass
-
-			
-def PsScript(sig=None, Timeout=0, Ignoring=0):
-	elements = {}
-	if sig:
-		target, sig = Signature(sig)
-		pyscript = getaete.Getaete(sig)
-	else:
-		target, sig = Signature('Pyth')
-		pyscript = getaete.Getaete()
-	setattr(PyScript, 'timeout', Timeout)
-	setattr(PyScript, 'ignoring', Ignoring)
-	setattr(PyScript, 'target', target)
-	for key, value in pyscript[0].items():
-		setattr(PsEvents, key, value)
-	for key, value in pyscript[1].items():
-		CreateClass(key, 'PsClasses', value)
-		for val in value[2]:
-			CreateProperty(val[0], 'PsClasses', `val[1]`)
-			
-		if value[3]:
-			for val in value[3]:
-				if val[0] not in elements.keys():
-					elements[val[0]] = val[1]
-				elif len(val[1]) > len(elements[val[0]]):
-					elements[val[0]] = val[1]
-
-	for key, value in pyscript[2].items():
-		for val in value:
-			setattr(PsEnumerations, val[0], val[1])
-
-def CreateClass(newClassName, superClassName, value):
-	parentDict = PsClass.__dict__
-	exec "class %s(%s): pass" % (newClassName, superClassName) in \
-			globals(), parentDict
-	newClassObj = parentDict[newClassName]
-	newClassObj.__init__ = template
-	exec "setattr(newClassObj, 'want', %s)" % `value[0]`
-	if value[2] and value[2][0][0] == 'every':
-		exec "setattr(newClassObj, 'plur', 1)"
-
-def CreateProperty(newClassName, superClassName, value):
-	parentDict = PsProperties.__dict__
-	exec "class %s(%s): pass" % (newClassName, superClassName) in \
-			globals(), parentDict
-	newClassObj = parentDict[newClassName]
-	if newClassName == 'Every':
-		value = "baetypes.mkOrdinal('every')"
-	newClassObj.__init__ = template1
-	exec "setattr(newClassObj, 'seld', %s)" % value
-
-def Signature(signature):
-	if type(signature) == AEDescType:
-		target = signature
-	elif type(signature) == InstanceType and hasattr(signature, '__aepack__'):
-		target = signature.__aepack__()
-	elif type(signature) == StringType:
-		if len(signature) == 4:
-			target = AE.AECreateDesc(AppleEvents.typeApplSignature, signature)
-			target_signature = signature
-		else:
-			#This should ready be made persistant, so PythonScript 'remembered' where applications were
-			fss, ok = macfs.PromptGetFile('Find the aplication %s' % signature, 'APPL')
-			if ok:
-				target_signature = fss.GetCreatorType()[0]
-				target = AE.AECreateDesc(AppleEvents.typeApplSignature, target_signature)
-	else:
-		raise TypeError, "signature should be 4-char string or AEDesc"
-	return target, target_signature
-
-		
-
-		
-class PyScript(PsEvents):
-	def __init__(self, name, obj=None,  **args):
-		desc, code, subcode, rply, message, keywds = name
-#		print 'code', code
-#		print 'subcode', subcode
-#		print 'rply', rply
-#		print 'message', message
-#		print 'keywds', keywds
-#		print 'name', name
-#		print 'obj', obj
-#		print 'args', args
-		self.code = code
-		self.subcode = subcode
-		self.attributes ={}
-		self.arguments = {}
-		if keywds:
-			self.arguments = self.keyargs(keywds, args)
-		self.arguments['----'] = self.keyfms(message[0], obj)
-
-		##XXXX Eudora needs this XXXX##
-		if self.arguments['----'] == None:
-			del self.arguments['----']
-#		print 'arguments', self.arguments
-		if self.ignoring or rply[0] == 'null':
-			self.send_flags = AppleEvents.kAENoReply
-		else:
-			self.send_flags = AppleEvents.kAEWaitReply
-		self.send_priority = AppleEvents.kAENormalPriority	
-		if self.timeout:
-			self.send_timeout = self.timeout
-		else:
-			self.send_timeout = AppleEvents.kAEDefaultTimeout
-
-
-	def keyargs(self, ats, args):
-#		print 'keyargs', ats, args
-		output = {}
-		for arg in args.keys():
-			for at in ats:
-				if at[0] == arg:
-					output[at[1]] = self.keyfms(at[2][0], args[arg])
-		return output
-				
-	def keyfms(self, key, value):
-#		print 'keyfms', 'key', key, `value`
-		if key == 'obj ' or key == 'insl':
-			return eval(`value`)
-		elif key == 'TEXT':
-			return value
-		elif key == 'null':
-			return 
-		elif key == 'bool':
-			return baetypes.mkboolean(value)
-		elif key == 'type':
-			try:
-				val = eval('PsClass.%s()' % value)
-				return baetypes.mktype(str(val))
-			except:
-				return baetypes.mktype(value)
-		else:
-			print "I don't know what to put here -- script.keyargs"
-			print key, `value`
-			sys.exit[1]
-		
-	def newevent(self, code, subcode, parameters = {}, attributes = {}):
-		"""Create a complete structure for an apple event"""
-#		print code, subcode, parameters, attributes
-		event = AE.AECreateAppleEvent(code, subcode, self.target,
-			  	  AppleEvents.kAutoGenerateReturnID, AppleEvents.kAnyTransactionID)
-		baetools.packevent(event, parameters, attributes)
-		return event
-		
-	def sendevent(self, event):
-		"""Send a pre-created appleevent, await the reply and unpack it"""
-		
-		reply = event.AESend(self.send_flags, self.send_priority,
-							  self.send_timeout)
-		parameters, attributes = baetools.unpackevent(reply)
-		return reply, parameters, attributes
-		
-	def send(self, code, subcode, parameters = {}, attributes = {}):
-		"""Send an appleevent given code/subcode/pars/attrs and unpack the reply"""
-#		print code, subcode, parameters, attributes
-		return self.sendevent(self.newevent(code, subcode, parameters, attributes))
-		
-	def __str__(self):
-		_reply, _arguments, _attributes = self.send(self.code, self.subcode, self.arguments, self.attributes)
-
-		if _arguments.has_key('errn'):
-			raise baetools.Error, baetools.decodeerror(_arguments)
-		# XXXX Optionally decode result
-		if _arguments.has_key('----'):
-			return str(_arguments['----'])
-		else:
-			return 
-
-	
-	
-def test():
-	Simp = 'Hermit:Applications:SimpleText'
-	PsScript('MACS', Timeout=60*60*3)
-#	PsScript('CSOm', Timeout=60*60*3)
-#	PsScript('', Timeout=60*60*3)
-#	PyScript('macsoup')
-	ev = PsEvents
-	ps = PsClass
-#	print PsProperties.__dict__
-#	y = script(ev.Open, File('Hermit:Desktop Folder:Lincolnshire Imp'), using=Application_file(Simp))
-#	print baetypes.NProperty('prop', 'prop', 'pnam',  baetypes.ObjectSpecifier('cdis', 'indx', 1, None))
-#	y = PyScript(ev.Get, Disk("Hermit").Folder(7).File(1).Name())
-#	y = PyScript(ev.Get, Disk("Hermit").Size(), As='Integer')
-#	y = PyScript(ev.Get, ps.Desktopobject(1).Startup_disk())
-#	y = PyScript(ev.Get, Mailbox(1).File(), as='TEXT')
-#	print 'y', y, type(y)
-
-if __name__ == '__main__':
-	test()
-#	sys.exit(1)
-	
diff --git a/Mac/Unsupported/PythonScript/ReadMe.txt b/Mac/Unsupported/PythonScript/ReadMe.txt
deleted file mode 100644
index 455f12a..0000000
--- a/Mac/Unsupported/PythonScript/ReadMe.txt
+++ /dev/null
@@ -1,86 +0,0 @@
-
-PythonScript
-------------
-v0.5 beta 1 24/04/98
-
-author: Bill Bedford, <billb@mousa.demon.co.uk>
-
-This suite of modules is a first attempt at writing a more user friendly 
-python/appleevent interface. The files in the suite are:
-
-PythonScript
-------------
-
-Loads three dictionaries generated by getaete into __dict__'s of three 
-classes and thus gives us direct assess to all the methods in the aete.  
-Each method now contains all the information needed to build apple events.
-
-The general usage is
-
->>>PythonScript.PsScript(SIGNATURE, TIMEOUT, IGNORING) 
-
-where 
-SIGNATURE is the target application
-TIMEOUT is in ticks
-and IGNORING is a boolean and determines whether the script waits for a reply 
-from the target before going on to the next event 
-
->>>PythonScript.PyScript(Event, Object, keywdarg1..., keywdarg2...etc)
-
-Object is a appleevent object specifier and is of the form
-
-PythonScript.PsClass.Class1(arg).Class2(arg)ƒ.Property()
-
-All applescript event, class and property names are capitalised to 
-distinguish them from python methods.
-
-getaete
--------
-
-Reads the aete of the target application and returns it as a list of three 
-dictionaries, which represent all the events, properties and enumeration in 
-the aete.  (the fourth dictionary, comparisons, has never been implemented 
-in applescript so I have not used it) It also reads the applescript aeut 
-and adds any suites that are missing (ie where the application author has 
-set his suite to inherit from the aeut.)  and the applescript suite, which 
-gives the language methods
-
-printaete
----------
-
-Produces a text file with the aete set out in a human readable form, 
-similar to the Open Dictionary command in the applescript editor.
-
-
-baetools, baepack, baetypes
----------------------------
-
-These are direct equivalents of aetools, aepack, aetypes in the standard 
-distribution.  Some methods and classes have been enhanced others are 
-redundant
-
-PyScriptTest, testeudora
-------------------------
-
-A couple of test scripts.  Testeudora is an updated version of the one in 
-the standard distribution.
-	 
-	 
-	 
-	 
-	 
-Still To Do (in no particular order)
------------
-
-These modules are much slower than applescript.  I believe they could be 
-made faster by rewriting the aete parser in getaete and/or by putting in 
-some form of persistent storage so that the class dictionaries can be cached.
-	 
-The parsing of the appleevent replies need rewriting.
-
-Support for the use of scripting additions.
-
-A Python aeut needs to be written, much of the applescript one is redundant 
-in python.
-
-Probably a few other things I haven't thought of yet.
diff --git a/Mac/Unsupported/PythonScript/baepack.py b/Mac/Unsupported/PythonScript/baepack.py
deleted file mode 100644
index 39e064b..0000000
--- a/Mac/Unsupported/PythonScript/baepack.py
+++ /dev/null
@@ -1,383 +0,0 @@
-"""Tools for use in AppleEvent clients and servers:
-conversion between AE types and python types
-
-pack(x) converts a Python object to an AEDesc object
-unpack(desc) does the reverse
-coerce(x, wanted_sample) coerces a python object to another python object
-"""
-
-#
-# This code was originally written by Guido, and modified/extended by Jack
-# to include the various types that were missing. The reference used is
-# Apple Event Registry, chapter 9.
-#
-
-import struct
-import string
-import types
-from string import strip
-from types import *
-from Carbon import AE
-from Carbon.AppleEvents import *
-import MacOS
-import macfs
-import StringIO
-import baetypes
-from baetypes import mkenum, mktype
-
-import calldll
-
-OSL = calldll.getlibrary('ObjectSupportLib')
-
-# These ones seem to be missing from AppleEvents
-# (they're in AERegistry.h)
-
-#typeColorTable = 'clrt'
-#typeDrawingArea = 'cdrw'
-#typePixelMap = 'cpix'
-#typePixelMapMinus = 'tpmm'
-#typeRotation = 'trot'
-#typeTextStyles = 'tsty'
-#typeStyledText = 'STXT'
-#typeAEText = 'tTXT'
-#typeEnumeration = 'enum'
-
-#
-# Some AE types are immedeately coerced into something
-# we like better (and which is equivalent)
-#
-unpacker_coercions = {
-	typeComp : typeExtended,
-	typeColorTable : typeAEList,
-	typeDrawingArea : typeAERecord,
-	typeFixed : typeExtended,
-	typeFloat : typeExtended,
-	typePixelMap : typeAERecord,
-	typeRotation : typeAERecord,
-	typeStyledText : typeAERecord,
-	typeTextStyles : typeAERecord,
-};
-
-#
-# Some python types we need in the packer:
-#
-AEDescType = type(AE.AECreateDesc('TEXT', ''))
-_sample_fss = macfs.FSSpec(':')
-_sample_alias = _sample_fss.NewAliasMinimal()
-FSSType = type(_sample_fss)
-AliasType = type(_sample_alias)
-
-def pack(x, forcetype = None):
-	"""Pack a python object into an AE descriptor"""
-#	print 'aepack', x, type(x), forcetype
-#	if type(x) == TupleType:
-#		forcetype, x = x
-	if forcetype:
-		print x, forcetype
-		if type(x) is StringType:
-			return AE.AECreateDesc(forcetype, x)
-		else:
-			return pack(x).AECoerceDesc(forcetype)
-			
-	if x == None:
-		return AE.AECreateDesc('null', '')
-		
-	t = type(x)
-	if t == AEDescType:
-		return x
-	if t == FSSType:
-		return AE.AECreateDesc('fss ', x.data)
-	if t == AliasType:
-		return AE.AECreateDesc('alis', x.data)
-	if t == IntType:
-		return AE.AECreateDesc('long', struct.pack('l', x))
-	if t == FloatType:
-		#
-		# XXXX (note by Guido) Weird thing -- Think C's "double" is 10 bytes, but
-		# struct.pack('d') return 12 bytes (and struct.unpack requires
-		# them, too).  The first 2 bytes seem to be repeated...
-		# Probably an alignment problem
-		# XXXX (note by Jack) haven't checked this under MW
-		#
-#		return AE.AECreateDesc('exte', struct.pack('d', x)[2:])
-		return AE.AECreateDesc('exte', struct.pack('d', x))
-	if t == StringType:
-		return AE.AECreateDesc('TEXT', x)
-	if t == ListType:
-		list = AE.AECreateList('', 0)
-		for item in x:
-			list.AEPutDesc(0, pack(item))
-		return list
-	if t == DictionaryType:
-		record = AE.AECreateList('', 1)
-		for key, value in x.items():
-			record.AEPutParamDesc(key, pack(value))
-		return record
-	if t == InstanceType and hasattr(x, '__aepack__'):
-		return x.__aepack__()
-	return AE.AECreateDesc('TEXT', repr(x)) # Copout
-
-def unpack(desc):
-	"""Unpack an AE descriptor to a python object"""
-	t = desc.type
-#	print t
-	
-	if unpacker_coercions.has_key(t):
-		desc = desc.AECoerceDesc(unpacker_coercions[t])
-		t = desc.type # This is a guess by Jack....
-	
-	if t == typeAEList:
-		l = []
-		for i in range(desc.AECountItems()):
-			keyword, item = desc.AEGetNthDesc(i+1, '****')
-			l.append(unpack(item))
-		return l
-	if t == typeAERecord:
-		d = {}
-		for i in range(desc.AECountItems()):
-			keyword, item = desc.AEGetNthDesc(i+1, '****')
-			d[keyword] = unpack(item)
-		return d
-	if t == typeAEText:
-		record = desc.AECoerceDesc('reco')
-		return mkaetext(unpack(record))
-	if t == typeAlias:
-		return macfs.RawAlias(desc.data)
-	# typeAppleEvent returned as unknown
-	if t == typeBoolean:
-		return struct.unpack('b', desc.data)[0]
-	if t == typeChar:
-		return desc.data
-	# typeColorTable coerced to typeAEList
-	# typeComp coerced to extended
-	# typeData returned as unknown
-	# typeDrawingArea coerced to typeAERecord
-	if t == typeEnumeration:
-		return mkenum(desc.data)
-	# typeEPS returned as unknown
-	if t == typeExtended:
-#		print desc, type(desc), len(desc)
-		data = desc.data
-#		print `data[:8]`, type(data), len(data[:8])
-#		print struct.unpack('=d', data[:8])[0]
-#		print string.atoi(data), type(data), len(data)
-#		print struct.calcsize(data)
-		# XXX See corresponding note for pack()
-#		return struct.unpack('d', data[:2] + data)[0]
-		return struct.unpack('d', data[:8])[0]
-	if t == typeFalse:
-		return 0
-	# typeFixed coerced to extended
-	# typeFloat coerced to extended
-	if t == typeFSS:
-		return macfs.RawFSSpec(desc.data)
-	if t == typeInsertionLoc:
-		record = desc.AECoerceDesc('reco')
-		return mkinsertionloc(unpack(record))
-	# typeInteger equal to typeLongInteger
-	if t == typeIntlText:
-		script, language = struct.unpack('hh', desc.data[:4])
-		return baetypes.IntlText(script, language, desc.data[4:])
-	if t == typeIntlWritingCode:
-		script, language = struct.unpack('hh', desc.data)
-		return baetypes.IntlWritingCode(script, language)
-	if t == typeKeyword:
-		return mkkeyword(desc.data)
-	# typeLongFloat is equal to typeFloat
-	if t == typeLongInteger:
-#		print t, struct.unpack('l', desc.data)
-		return struct.unpack('l', desc.data)[0]
-	if t == typeNull:
-		return None
-	if t == typeMagnitude:
-		v = struct.unpack('l', desc.data)
-		if v < 0:
-			v = 0x100000000L + v
-		return v
-	if t == typeObjectSpecifier:
-		from Carbon import Res
-#		print desc, type(desc)
-#		print desc.__members__
-#		print desc.data, desc.type
-#		print unpack(desc)
-#		getOSL = calldll.newcall(OSL.AEResolve, 'OSErr', 'InHandle', 'InShort')#, 'InString')
-#		print 'OSL', getOSL(rdesc, 0)#, desc.data)
-		record = desc.AECoerceDesc('reco')
-#		print record
-		return mkobject(unpack(record))
-	# typePict returned as unknown
-	# typePixelMap coerced to typeAERecord
-	# typePixelMapMinus returned as unknown
-	# typeProcessSerialNumber returned as unknown
-	if t == typeQDPoint:
-		v, h = struct.unpack('hh', desc.data)
-		return baetypes.QDPoint(v, h)
-	if t == typeQDRectangle:
-		v0, h0, v1, h1 = struct.unpack('hhhh', desc.data)
-		return baetypes.QDRectangle(v0, h0, v1, h1)
-	if t == typeRGBColor:
-		r, g, b = struct.unpack('hhh', desc.data)
-		return baetypes.RGBColor(r, g, b)
-	# typeRotation coerced to typeAERecord
-	# typeScrapStyles returned as unknown
-	# typeSessionID returned as unknown
-	if t == typeShortFloat:
-		return struct.unpack('f', desc.data)[0]
-	if t == typeShortInteger:
-#		print t, desc.data
-#		print struct.unpack('h', desc.data)[0]
-		return struct.unpack('h', desc.data)[0]
-	# typeSMFloat identical to typeShortFloat
-	# typeSMInt	indetical to typeShortInt
-	# typeStyledText coerced to typeAERecord
-	if t == typeTargetID:
-		return mktargetid(desc.data)
-	# typeTextStyles coerced to typeAERecord
-	# typeTIFF returned as unknown
-	if t == typeTrue:
-		return 1
-	if t == typeType:
-#		print t, desc.data
-		return mktype(desc.data)
-	#
-	# The following are special
-	#
-	if t == 'rang':
-		record = desc.AECoerceDesc('reco')
-		return mkrange(unpack(record))
-	if t == 'cmpd':
-		record = desc.AECoerceDesc('reco')
-		return mkcomparison(unpack(record))
-	if t == 'logi':
-		record = desc.AECoerceDesc('reco')
-		return mklogical(unpack(record))
-	return mkunknown(desc.type, desc.data)
-	
-def coerce(data, egdata):
-	"""Coerce a python object to another type using the AE coercers"""
-	pdata = pack(data)
-	pegdata = pack(egdata)
-	pdata = pdata.AECoerceDesc(pegdata.type)
-	return unpack(pdata)
-
-#
-# Helper routines for unpack
-#
-def mktargetid(data):
-	sessionID = getlong(data[:4])
-	name = mkppcportrec(data[4:4+72])
-	location = mklocationnamerec(data[76:76+36])
-	rcvrName = mkppcportrec(data[112:112+72])
-	return sessionID, name, location, rcvrName
-
-def mkppcportrec(rec):
-	namescript = getword(rec[:2])
-	name = getpstr(rec[2:2+33])
-	portkind = getword(rec[36:38])
-	if portkind == 1:
-		ctor = rec[38:42]
-		type = rec[42:46]
-		identity = (ctor, type)
-	else:
-		identity = getpstr(rec[38:38+33])
-	return namescript, name, portkind, identity
-
-def mklocationnamerec(rec):
-	kind = getword(rec[:2])
-	stuff = rec[2:]
-	if kind == 0: stuff = None
-	if kind == 2: stuff = getpstr(stuff)
-	return kind, stuff
-
-def mkunknown(type, data):
-	return baetypes.Unknown(type, data)
-
-def getpstr(s):
-	return s[1:1+ord(s[0])]
-
-def getlong(s):
-	return (ord(s[0])<<24) | (ord(s[1])<<16) | (ord(s[2])<<8) | ord(s[3])
-
-def getword(s):
-	return (ord(s[0])<<8) | (ord(s[1])<<0)
-
-def mkkeyword(keyword):
-	return baetypes.Keyword(keyword)
-
-def mkrange(dict):
-	return baetypes.Range(dict['star'], dict['stop'])
-
-def mkcomparison(dict):
-	return baetypes.Comparison(dict['obj1'], dict['relo'].enum, dict['obj2'])
-
-def mklogical(dict):
-	return baetypes.Logical(dict['logc'], dict['term'])
-
-def mkstyledtext(dict):
-	return baetypes.StyledText(dict['ksty'], dict['ktxt'])
-	
-def mkaetext(dict):
-	return baetypes.AEText(dict[keyAEScriptTag], dict[keyAEStyles], dict[keyAEText])
-	
-def mkinsertionloc(dict):
-	return baetypes.InsertionLoc(dict[keyAEObject], dict[keyAEPosition])
-
-def mkobject(dict):
-	want = dict['want'].type
-	form = dict['form'].enum
-	seld = dict['seld']
-	fr   = dict['from']
-	if form in ('name', 'indx', 'rang', 'test'):
-		if want == 'text': return baetypes.Text(seld, fr)
-		if want == 'cha ': return baetypes.Character(seld, fr)
-		if want == 'cwor': return baetypes.Word(seld, fr)
-		if want == 'clin': return baetypes.Line(seld, fr)
-		if want == 'cpar': return baetypes.Paragraph(seld, fr)
-		if want == 'cwin': return baetypes.Window(seld, fr)
-		if want == 'docu': return baetypes.Document(seld, fr)
-		if want == 'file': return baetypes.File(seld, fr)
-		if want == 'cins': return baetypes.InsertionPoint(seld, fr)
-	if want == 'prop' and form == 'prop' and baetypes.IsType(seld):
-		return baetypes.Property(seld.type, fr)
-	return baetypes.ObjectSpecifier(want, form, seld, fr)
-
-def _test():
-	"""Test program. Pack and unpack various things"""
-	objs = [
-		'a string',
-		12,
-		12.0,
-		None,
-		['a', 'list', 'of', 'strings'],
-		{'key1': 'value1', 'key2':'value2'},
-		macfs.FSSpec(':'),
-		macfs.FSSpec(':').NewAliasMinimal(),
-		baetypes.Enum('enum'),
-		baetypes.Type('type'),
-		baetypes.Keyword('kwrd'),
-		baetypes.Range(1, 10),
-		baetypes.Comparison(1, '<   ', 10),
-		baetypes.Logical('not ', 1),
-		# Cannot do StyledText
-		# Cannot do AEText
-		baetypes.IntlText(0, 0, 'international text'),
-		baetypes.IntlWritingCode(0,0),
-		baetypes.QDPoint(50,100),
-		baetypes.QDRectangle(50,100,150,200),
-		baetypes.RGBColor(0x7000, 0x6000, 0x5000),
-		baetypes.Unknown('xxxx', 'unknown type data'),
-		baetypes.Character(1),
-		baetypes.Character(2, baetypes.Line(2)),
-	]
-	for o in objs:
-		print 'BEFORE', o, `o`
-		print type(o)
-		packed = pack(o)
-		unpacked = unpack(packed)
-		print 'AFTER ', unpacked, `unpacked`
-	import sys
-	sys.exit(1)
-	
-if __name__ == '__main__':
-	_test()
-	
diff --git a/Mac/Unsupported/PythonScript/baetools.py b/Mac/Unsupported/PythonScript/baetools.py
deleted file mode 100644
index acc00a6..0000000
--- a/Mac/Unsupported/PythonScript/baetools.py
+++ /dev/null
@@ -1,263 +0,0 @@
-"""Tools for use in AppleEvent clients and servers.
-
-pack(x) converts a Python object to an AEDesc object
-unpack(desc) does the reverse
-
-packevent(event, parameters, attributes) sets params and attrs in an AEAppleEvent record
-unpackevent(event) returns the parameters and attributes from an AEAppleEvent record
-
-Plus...  Lots of classes and routines that help representing AE objects,
-ranges, conditionals, logicals, etc., so you can write, e.g.:
-
-	x = Character(1, Document("foobar"))
-
-and pack(x) will create an AE object reference equivalent to AppleScript's
-
-	character 1 of document "foobar"
-
-Some of the stuff that appears to be exported from this module comes from other
-files: the pack stuff from aepack, the objects from aetypes.
-
-"""
-
-from types import *
-from Carbon import AE
-from Carbon import AppleEvents
-import MacOS
-import sys
-
-from baetypes import *
-from baepack import pack, unpack, coerce, AEDescType
-
-Error = 'baetools.Error'
-
-# Special code to unpack an AppleEvent (which is *not* a disguised record!)
-# Note by Jack: No??!? If I read the docs correctly it *is*....
-
-aekeywords = [
-	'tran',
-	'rtid',
-	'evcl',
-	'evid',
-	'addr',
-	'optk',
-	'timo',
-	'inte',	# this attribute is read only - will be set in AESend
-	'esrc',	# this attribute is read only
-	'miss',	# this attribute is read only
-	'from'	# new in 1.0.1
-]
-
-def missed(ae):
-	try:
-		desc = ae.AEGetAttributeDesc('miss', 'keyw')
-	except AE.Error, msg:
-		return None
-	return desc.data
-
-def unpackevent(ae):
-	parameters = {}
-	while 1:
-		key = missed(ae)
-		if not key: break
-		parameters[key] = unpack(ae.AEGetParamDesc(key, '****'))
-	attributes = {}
-	for key in aekeywords:
-		try:
-			desc = ae.AEGetAttributeDesc(key, '****')
-		except (AE.Error, MacOS.Error), msg:
-			if msg[0] != -1701 and msg[0] != -1704:
-				raise sys.exc_type, sys.exc_value
-			continue
-		attributes[key] = unpack(desc)
-	return parameters, attributes
-
-def packevent(ae, parameters = {}, attributes = {}):
-	for key, value in parameters.items():
-		ae.AEPutParamDesc(key, pack(value))
-	for key, value in attributes.items():
-		ae.AEPutAttributeDesc(key, pack(value))
-
-#
-# Support routine for automatically generated Suite interfaces
-# These routines are also useable for the reverse function.
-#
-def keysubst(arguments, keydict):
-	"""Replace long name keys by their 4-char counterparts, and check"""
-	ok = keydict.values()
-	for k in arguments.keys():
-		if keydict.has_key(k):
-			v = arguments[k]
-			del arguments[k]
-			arguments[keydict[k]] = v
-		elif k != '----' and k not in ok:
-			raise TypeError, 'Unknown keyword argument: %s'%k
-			
-def enumsubst(arguments, key, edict):
-	"""Substitute a single enum keyword argument, if it occurs"""
-	if not arguments.has_key(key):
-		return
-	v = arguments[key]
-	ok = edict.values()
-	if edict.has_key(v):
-		arguments[key] = edict[v]
-	elif not v in ok:
-		raise TypeError, 'Unknown enumerator: %s'%v
-		
-def decodeerror(arguments):
-	"""Create the 'best' argument for a raise MacOS.Error"""
-	errn = arguments['errn']
-	err_a1 = errn
-	if arguments.has_key('errs'):
-		err_a2 = arguments['errs']
-	else:
-		err_a2 = MacOS.GetErrorString(errn)
-	if arguments.has_key('erob'):
-		err_a3 = arguments['erob']
-	else:
-		err_a3 = None
-	
-	return (err_a1, err_a2, err_a3)
-
-class TalkTo:
-	"""An AE connection to an application"""
-	
-	def __init__(self, signature, start=0, timeout=0):
-		"""Create a communication channel with a particular application.		
-		Addressing the application is done by specifying either a
-		4-byte signature, an AEDesc or an object that will __aepack__
-		to an AEDesc.
-		"""
-		self.target_signature = None
-		if type(signature) == AEDescType:
-			self.target = signature
-		elif type(signature) == InstanceType and hasattr(signature, '__aepack__'):
-			self.target = signature.__aepack__()
-		elif type(signature) == StringType and len(signature) == 4:
-			self.target = AE.AECreateDesc(AppleEvents.typeApplSignature, signature)
-			self.target_signature = signature
-		else:
-			raise TypeError, "signature should be 4-char string or AEDesc"
-		self.send_flags = AppleEvents.kAEWaitReply
-		self.send_priority = AppleEvents.kAENormalPriority
-		if timeout:
-			self.send_timeout = timeout
-		else:
-			self.send_timeout = AppleEvents.kAEDefaultTimeout
-		if start:
-			self.start()
-		
-	def start(self):
-		"""Start the application, if it is not running yet"""
-		self.send_flags = AppleEvents.kAENoReply
-		_launch(self.target_signature)
-			
-	def newevent(self, code, subcode, parameters = {}, attributes = {}):
-		"""Create a complete structure for an apple event"""
-		event = AE.AECreateAppleEvent(code, subcode, self.target,
-		      	  AppleEvents.kAutoGenerateReturnID, AppleEvents.kAnyTransactionID)
-#		print parameters, attributes
-		packevent(event, parameters, attributes)
-		return event
-	
-	def sendevent(self, event):
-		"""Send a pre-created appleevent, await the reply and unpack it"""
-		
-		reply = event.AESend(self.send_flags, self.send_priority,
-		                          self.send_timeout)
-		parameters, attributes = unpackevent(reply)
-		return reply, parameters, attributes
-		
-	def send(self, code, subcode, parameters = {}, attributes = {}):
-		"""Send an appleevent given code/subcode/pars/attrs and unpack the reply"""
-		return self.sendevent(self.newevent(code, subcode, parameters, attributes))
-	
-	#
-	# The following events are somehow "standard" and don't seem to appear in any
-	# suite...
-	#
-	def activate(self):
-		"""Send 'activate' command"""
-		self.send('misc', 'actv')
-
-	def _get(self, _object, as=None, _attributes={}):
-		"""_get: get data from an object
-		Required argument: the object
-		Keyword argument _attributes: AppleEvent attribute dictionary
-		Returns: the data
-		"""
-		_code = 'core'
-		_subcode = 'getd'
-
-		_arguments = {'----':_object}
-		if as:
-			_arguments['rtyp'] = mktype(as)
-
-		_reply, _arguments, _attributes = self.send(_code, _subcode,
-				_arguments, _attributes)
-		if _arguments.has_key('errn'):
-			raise Error, decodeerror(_arguments)
-
-		if _arguments.has_key('----'):
-			return _arguments['----']
-
-# Tiny Finder class, for local use only
-
-class _miniFinder(TalkTo):
-	def open(self, _object, _attributes={}, **_arguments):
-		"""open: Open the specified object(s)
-		Required argument: list of objects to open
-		Keyword argument _attributes: AppleEvent attribute dictionary
-		"""
-		_code = 'aevt'
-		_subcode = 'odoc'
-
-		if _arguments: raise TypeError, 'No optional args expected'
-		_arguments['----'] = _object
-
-
-		_reply, _arguments, _attributes = self.send(_code, _subcode,
-				_arguments, _attributes)
-		if _arguments.has_key('errn'):
-			raise aetools.Error, aetools.decodeerror(_arguments)
-		# XXXX Optionally decode result
-		if _arguments.has_key('----'):
-			return _arguments['----']
-#pass
-	
-_finder = _miniFinder('MACS')
-
-def _launch(appfile):
-	"""Open a file thru the finder. Specify file by name or fsspec"""
-	_finder.open(_application_file(('ID  ', appfile)))
-
-
-class _application_file(ComponentItem):
-	"""application file - An application's file on disk"""
-	want = 'appf'
-	
-_application_file._propdict = {
-}
-_application_file._elemdict = {
-}
-	
-# Test program
-# XXXX Should test more, really...
-
-def test():
-	target = AE.AECreateDesc('sign', 'quil')
-	ae = AE.AECreateAppleEvent('aevt', 'oapp', target, -1, 0)
-	print unpackevent(ae)
-	raw_input(":")
-	ae = AE.AECreateAppleEvent('core', 'getd', target, -1, 0)
-	obj = Character(2, Word(1, Document(1)))
-	print obj
-	print repr(obj)
-	packevent(ae, {'----': obj})
-	params, attrs = unpackevent(ae)
-	print params['----']
-	raw_input(":")
-
-if __name__ == '__main__':
-	test()
-	sys.exit(1)
diff --git a/Mac/Unsupported/PythonScript/baetypes.py b/Mac/Unsupported/PythonScript/baetypes.py
deleted file mode 100644
index 9b50e78..0000000
--- a/Mac/Unsupported/PythonScript/baetypes.py
+++ /dev/null
@@ -1,562 +0,0 @@
-"""aetypes - Python objects representing various AE types."""
-
-from Carbon.AppleEvents import *
-import struct
-from types import *
-import string
-
-#
-# convoluted, since there are cyclic dependencies between this file and
-# aetools_convert.
-#
-def pack(*args):
-	from aepack import pack
-	return apply(pack, args)
-	
-def IsSubclass(cls, base):
-	"""Test whether CLASS1 is the same as or a subclass of CLASS2"""
-	# Loop to optimize for single inheritance
-	while 1:
-		if cls is base: return 1
-		if len(cls.__bases__) <> 1: break
-		cls = cls.__bases__[0]
-	# Recurse to cope with multiple inheritance
-	for c in cls.__bases__:
-		if IsSubclass(c, base): return 1
-	return 0
-
-def IsInstance(x, cls):
-	"""Test whether OBJECT is an instance of (a subclass of) CLASS"""
-	return type(x) is InstanceType and IsSubclass(x.__class__, cls)
-
-def nice(s):
-	"""'nice' representation of an object"""
-	if type(s) is StringType: return repr(s)
-	else: return str(s)
-
-class Unknown:
-	"""An uninterpreted AE object"""
-	
-	def __init__(self, type, data):
-		self.type = type
-		self.data = data
-	
-	def __repr__(self):
-		return "Unknown(%s, %s)" % (`self.type`, `self.data`)
-	
-	def __aepack__(self):
-		return pack(self.data, self.type)
-
-class Enum:
-	"""An AE enumeration value"""
-	
-	def __init__(self, enum):
-		self.enum = "%-4.4s" % str(enum)
-	
-	def __repr__(self):
-		return "Enum(%s)" % `self.enum`
-	
-	def __str__(self):
-		return string.strip(self.enum)
-	
-	def __aepack__(self):
-		return pack(self.enum, typeEnumeration)
-
-def IsEnum(x):
-	return IsInstance(x, Enum)
-
-def mkenum(enum):
-#	print enum
-	if IsEnum(enum): return enum
-	return Enum(enum)
-
-class Boolean:
-	"""An AE boolean value"""
-	
-	def __init__(self, bool):
-		if bool:
-			self.bool = "%-4.4s" % str(typeTrue)
-		else:
-			self.bool = "%-4.4s" % str(typeFalse)
-	
-	def __repr__(self):
-		return "Boolean(%s)" % self.bool
-	
-	def __str__(self):
-		return self.bool
-	
-	def __aepack__(self):
-		if self.bool == 'true':
-			return pack('', typeTrue)
-		else:
-			return pack('', typeFalse)
-
-def IsBoolean(x):
-	return IsInstance(x, Boolean)
-
-def mkboolean(bool):
-#	print bool
-	if IsBoolean(bool): return bool
-	return Boolean(bool)
-
-class Type:
-	"""An AE 4-char typename object"""
-	
-	def __init__(self, _type):
-		self.type = "%-4.4s" % str(_type)
-		
-	def __repr__(self):
-		return "Type(%s)" % `self.type`
-	
-	def __str__(self):
-		return string.strip(self.type)
-	
-	def __aepack__(self):
-#		print self.type, typeType
-		return pack(self.type, typeType)
-
-def IsType(x):
-	return IsInstance(x, Type)
-
-def mktype(_type):
-	# Should check for apple ID codes, will allow 
-	if IsType(_type): return _type
-	if type(_type) <> StringType: return _type
-	if len(_type) <> 4: return Type(eval('type' + _type))
-	return Type(_type)
-
-
-class Keyword:
-	"""An AE 4-char keyword object"""
-	
-	def __init__(self, keyword):
-		self.keyword = "%-4.4s" % str(keyword)
-	
-	def __repr__(self):
-		return "Keyword(%s)" % `self.keyword`
-	
-	def __str__(self):
-		return string.strip(self.keyword)
-	
-	def __aepack__(self):
-		return pack(self.keyword, typeKeyword)
-
-def IsKeyword(x):
-	return IsInstance(x, Keyword)
-
-class Range:
-	"""An AE range object"""
-	
-	def __init__(self, start, stop):
-		self.start = start
-		self.stop = stop
-	
-	def __repr__(self):
-		return "Range(%s, %s)" % (`self.start`, `self.stop`)
-	
-	def __str__(self):
-		return "%s thru %s" % (nice(self.start), nice(self.stop))
-	
-	def __aepack__(self):
-		return pack({'star': self.start, 'stop': self.stop}, 'rang')
-
-def IsRange(x):
-	return IsInstance(x, Range)
-
-class Comparison:
-	"""An AE Comparison"""
-	
-	def __init__(self, obj1, relo, obj2):
-		self.obj1 = obj1
-		self.relo = "%-4.4s" % str(relo)
-		self.obj2 = obj2
-	
-	def __repr__(self):
-		return "Comparison(%s, %s, %s)" % (`self.obj1`, `self.relo`, `self.obj2`)
-	
-	def __str__(self):
-		return "%s %s %s" % (nice(self.obj1), string.strip(self.relo), nice(self.obj2))
-	
-	def __aepack__(self):
-		return pack({'obj1': self.obj1,
-			     'relo': mkenum(self.relo),
-			     'obj2': self.obj2},
-			    'cmpd')
-
-def IsComparison(x):
-	return IsInstance(x, Comparison)
-	
-class NComparison(Comparison):
-	# The class attribute 'relo' must be set in a subclass
-	
-	def __init__(self, obj1, obj2):
-		Comparison.__init__(obj1, self.relo, obj2)
-
-class Ordinal:
-	"""An AE Ordinal"""
-	
-	def __init__(self, ord):
-		self.ord = ord
-	
-	def __repr__(self):
-		return  "baetypes.Ordinal(%s)" % `self.ord`
-	
-	def __str__(self):
-		return "%s" % (string.strip(self.ord))
-	
-	def __aepack__(self):
-		return pack(self.ord, typeAbsoluteOrdinal)
-
-def IsOrdinal(x):
-#	print 'IsOrdinal', x, IsInstance(x, Ordinal)
-	return IsInstance(x, Ordinal)
-	
-def mkOrdinal(Ord):
-	if IsOrdinal(Ord): return Ord
-	return Ordinal(Ord)
-
-
-	
-class NOrdinal(Ordinal):
-	# The class attribute 'abso' must be set in a subclass
-	
-	def __init__(self ):
-#		print 'NOrdinal', self.abso
-		Ordinal.__init__(self, self.abso)
-
-class Logical:
-	"""An AE logical expression object"""
-	
-	def __init__(self, logc, term):
-		self.logc = "%-4.4s" % str(logc)
-		self.term = term
-	
-	def __repr__(self):
-		return "Logical(%s, %s)" % (`self.logc`, `self.term`)
-	
-	def __str__(self):
-		if type(self.term) == ListType and len(self.term) == 2:
-			return "%s %s %s" % (nice(self.term[0]),
-			                     string.strip(self.logc),
-			                     nice(self.term[1]))
-		else:
-			return "%s(%s)" % (string.strip(self.logc), nice(self.term))
-	
-	def __aepack__(self):
-		return pack({'logc': mkenum(self.logc), 'term': self.term}, 'logi')
-
-def IsLogical(x):
-	return IsInstance(x, Logical)
-
-class StyledText:
-	"""An AE object respresenting text in a certain style"""
-	
-	def __init__(self, style, text):
-		self.style = style
-		self.text = text
-	
-	def __repr__(self):
-		return "StyledText(%s, %s)" % (`self.style`, `self.text`)
-	
-	def __str__(self):
-		return self.text
-	
-	def __aepack__(self):
-		return pack({'ksty': self.style, 'ktxt': self.text}, 'STXT')
-
-def IsStyledText(x):
-	return IsInstance(x, StyledText)
-
-class AEText:
-	"""An AE text object with style, script and language specified"""
-	
-	def __init__(self, script, style, text):
-		self.script = script
-		self.style = style
-		self.text = text
-	
-	def __repr__(self):
-		return "AEText(%s, %s, %s)" % (`self.script`, `self.style`, `self.text`)
-	
-	def __str__(self):
-		return self.text
-	
-	def __aepack__(self):
-		return pack({keyAEScriptTag: self.script, keyAEStyles: self.style,
-				 keyAEText: self.text}, typeAEText)
-
-def IsAEText(x):
-	return IsInstance(x, AEText)
-
-class IntlText:
-	"""A text object with script and language specified"""
-	
-	def __init__(self, script, language, text):
-		self.script = script
-		self.language = language
-		self.text = text
-	
-	def __repr__(self):
-		return "IntlText(%s, %s, %s)" % (`self.script`, `self.language`, `self.text`)
-	
-	def __str__(self):
-		return self.text
-	
-	def __aepack__(self):
-		return pack(struct.pack('hh', self.script, self.language)+self.text,
-			typeIntlText)
-
-def IsIntlText(x):
-	return IsInstance(x, IntlText)
-
-class IntlWritingCode:
-	"""An object representing script and language"""
-	
-	def __init__(self, script, language):
-		self.script = script
-		self.language = language
-	
-	def __repr__(self):
-		return "IntlWritingCode(%s, %s)" % (`self.script`, `self.language`)
-	
-	def __str__(self):
-		return "script system %d, language %d"%(self.script, self.language)
-	
-	def __aepack__(self):
-		return pack(struct.pack('hh', self.script, self.language),
-			typeIntlWritingCode)
-
-def IsIntlWritingCode(x):
-	return IsInstance(x, IntlWritingCode)
-
-class QDPoint:
-	"""A point"""
-	
-	def __init__(self, v, h):
-		self.v = v
-		self.h = h
-	
-	def __repr__(self):
-		return "QDPoint(%s, %s)" % (`self.v`, `self.h`)
-	
-	def __str__(self):
-		return "(%d, %d)"%(self.v, self.h)
-	
-	def __aepack__(self):
-		return pack(struct.pack('hh', self.v, self.h),
-			typeQDPoint)
-
-def IsQDPoint(x):
-	return IsInstance(x, QDPoint)
-
-class QDRectangle:
-	"""A rectangle"""
-	
-	def __init__(self, v0, h0, v1, h1):
-		self.v0 = v0
-		self.h0 = h0
-		self.v1 = v1
-		self.h1 = h1
-	
-	def __repr__(self):
-		return "QDRectangle(%s, %s, %s, %s)" % (`self.v0`, `self.h0`,
-				`self.v1`, `self.h1`)
-	
-	def __str__(self):
-		return "(%d, %d)-(%d, %d)"%(self.v0, self.h0, self.v1, self.h1)
-	
-	def __aepack__(self):
-		return pack(struct.pack('hhhh', self.v0, self.h0, self.v1, self.h1),
-			typeQDRectangle)
-
-def IsQDRectangle(x):
-	return IsInstance(x, QDRectangle)
-
-class RGBColor:
-	"""An RGB color"""
-	
-	def __init__(self, r, g, b):
-		self.r = r
-		self.g = g
-		self.b = b
-			
-	def __repr__(self):
-		return "RGBColor(%s, %s, %s)" % (`self.r`, `self.g`, `self.b`)
-	
-	def __str__(self):
-		return "0x%x red, 0x%x green, 0x%x blue"% (self.r, self.g, self.b)
-	
-	def __aepack__(self):
-		return pack(struct.pack('hhh', self.r, self.g, self.b),
-			typeRGBColor)
-
-def IsRGBColor(x):
-	return IsInstance(x, RGBColor)
-
-class ObjectSpecifier:
-	
-	"""A class for constructing and manipulation AE object specifiers in python.
-	
-	An object specifier is actually a record with four fields:
-	
-	key	type	description
-	---	----	-----------
-	
-	'want'	type	4-char class code of thing we want,
-			e.g. word, paragraph or property
-	
-	'form'	enum	how we specify which 'want' thing(s) we want,
-			e.g. by index, by range, by name, or by property specifier
-	
-	'seld'	any	which thing(s) we want,
-			e.g. its index, its name, or its property specifier
-	
-	'from'	object	the object in which it is contained,
-			or null, meaning look for it in the application
-	
-	Note that we don't call this class plain "Object", since that name
-	is likely to be used by the application.
-	"""
-	
-	def __init__(self, want, form, seld, fr = None):
-		self.want = want
-		self.form = form
-		self.seld = seld
-		self.fr = fr
-	
-	def __repr__(self):
-		s = "ObjectSpecifier(%s, %s, %s" % (`self.want`, `self.form`, `self.seld`)
-		if self.fr:
-			s = s + ", %s)" % `self.fr`
-		else:
-			s = s + ")"
-		return s
-	
-	def __aepack__(self):
-		return pack({'want': mktype(self.want),
-			     'form': mkenum(self.form),
-			     'seld': self.seld,
-			     'from': self.fr},
-			    'obj ')
-
-def IsObjectSpecifier(x):
-	return IsInstance(x, ObjectSpecifier)
-
-
-# Backwards compatability, sigh...
-class Property(ObjectSpecifier):
-
-	def __init__(self, which, fr = None, want='prop'):
-		ObjectSpecifier.__init__(self, want, 'prop', mktype(which), fr)
-
-	def __repr__(self):
-		if self.fr:
-			return "Property_r(%s, %s)" % (`self.seld.type`, `self.fr`)
-		else:
-			return "Property_r(%s)" % `self.seld.type`
-	
-	def __str__(self):
-		if self.fr:
-			return "Property %s of %s" % (str(self.seld), str(self.fr))
-		else:
-			return "Property_s %s" % str(self.seld)
-
-
-class NProperty(ObjectSpecifier):
-	# Subclasses *must* self baseclass attributes:
-	# want is the type of this property
-	# which is the property name of this property
-
-	def __init__(self, want, form, seld, fr = None):
-		ObjectSpecifier.__init__(self, want, form, 
-					mktype(seld), fr)
-
-
-class SelectableItem(ObjectSpecifier):
-	
-	def __init__(self, want, seld, fr = None):
-		t = type(seld)
-		if t == StringType:
-			form = 'name'
-		elif IsRange(seld):
-			form = 'rang'
-		elif IsComparison(seld) or IsLogical(seld):
-			form = 'test'
-		elif t == TupleType:
-			# Breakout: specify both form and seld in a tuple
-			# (if you want ID or rele or somesuch)
-			form, seld = seld
-		else:
-			form = 'indx'
-		ObjectSpecifier.__init__(self, want, form, seld, fr)
-
-
-class ComponentItem(SelectableItem):
-	# Derived classes *must* set the *class attribute* 'want' to some constant
-	# Also, dictionaries _propdict and _elemdict must be set to map property
-	# and element names to the correct classes
-	
-	def __init__(self, want, which, fr = None):
-		SelectableItem.__init__(self, want, which, fr)
-	
-	def __repr__(self):
-		if not self.fr:
-			return "%s(%s)" % (self.__class__.__name__, `self.seld`)
-		return "%s(%s, %s)" % (self.__class__.__name__, `self.seld`, `self.fr`)
-	
-	def __str__(self):
-		seld = self.seld
-		if type(seld) == StringType:
-			ss = repr(seld)
-		elif IsRange(seld):
-			start, stop = seld.start, seld.stop
-			if type(start) == InstanceType == type(stop) and \
-			   start.__class__ == self.__class__ == stop.__class__:
-				ss = str(start.seld) + " thru " + str(stop.seld)
-			else:
-				ss = str(seld)
-		else:
-			ss = str(seld)
-		s = "%s %s" % (self.__class__.__name__, ss)
-		if self.fr: s = s + " of %s" % str(self.fr)
-		return s
-		
-#	def __getattr__(self, name):
-#		print name
-#		if self._elemdict.has_key(name):
-#			cls = self._elemdict[name]
-#			return DelayedComponentItem(cls, self)
-#	   	if self._propdict.has_key(name):
-#	   		cls = self._propdict[name]
-#	   		return cls(self)
-#		raise AttributeError, name
-		
-		
-class DelayedComponentItem:
-	def __init__(self, compclass, fr):
-		self.compclass = compclass
-		self.fr = fr
-		
-	def __call__(self, which):
-		return self.compclass(which, self.fr)
-		
-	def __repr__(self):
-		return "%s(???, %s)" % (self.__class__.__name__, `self.fr`)
-		
-	def __str__(self):
-		return "selector for element %s of %s"%(self.__class__.__name__, str(self.fr))
-
-template = """
-class %s(ComponentItem): want = '%s'
-"""
-
-exec template % ("Text", 'text')
-exec template % ("Character", 'cha ')
-exec template % ("Word", 'cwor')
-exec template % ("Line", 'clin')
-exec template % ("paragraph", 'cpar')
-exec template % ("Window", 'cwin')
-exec template % ("Document", 'docu')
-exec template % ("File", 'file')
-exec template % ("InsertionPoint", 'cins')
-
diff --git a/Mac/Unsupported/PythonScript/getaete.py b/Mac/Unsupported/PythonScript/getaete.py
deleted file mode 100644
index ba22c9d..0000000
--- a/Mac/Unsupported/PythonScript/getaete.py
+++ /dev/null
@@ -1,406 +0,0 @@
-"""
-Produces a 3 dictionaries from application aete's 
-to be read by PythonScript
-
-v.02 january 31, 1998 added support for inheriting suites from aeut
-v.03 february 16, 1998 changes to identify
-v.04 february 26, 1998 simplified decode
-v.05 23/04/98 simplified _launch
-
-"""
-import baetools
-import macpath
-import sys
-import os
-import MacOS
-import StringIO
-import types
-from MACFS import *
-import macfs
-import string
-from Carbon.Res import *
-import struct
-
-# for testing only
-app ='CSOm' #'ezVu'# 'nwSP'#MACS'#
-
-#Restrict the application suites to the dialect we want to use.
-LANG = 0 # 0 = English, 1 = French, 11 = Japanese
-lang = {0:'English', 1:'French', 11:'Japanese'}
-
-#The following are neaded to open the application aete
-kASAppleScriptSuite	= 'ascr'
-kGetAETE			= 'gdte'
-attributes = {}
-arguments = {}
-
-class AETE(baetools.TalkTo):
-	pass
-	
-def Getaete(app):
-	try:
-		data = openaete(app)
-	except MacOS.Error, msg:
-		if msg[0] == -609:
-			_launch(app)
-			data = openaete(app)
-	data = decode(data['----'].data)
-	data = compileaete(data)
-	return data
-	
-	
-def decode(data):
-	"""Decode an aete into a python data structure"""
-	f = StringIO.StringIO(data)
-	aete = generic(getaete, f)
-	return aete
-
-def simplify(item):
-	"""Recursively replace singleton tuples by their constituent item"""
-	if type(item) is types.ListType:
-		return map(simplify, item)
-	elif type(item) == types.TupleType and len(item) == 2:
-		return simplify(item[1])
-	else:
-		return item
-
-
-## Here follows the aete resource decoder.
-## It is presented bottom-up instead of top-down because there are  direct
-## references to the lower-level part-decoders from the high-level part-decoders.
-#
-def getflag(f, *args):
-	m = ''
-	c = f.read(2)
-	print `c`
-	if not c:
-		raise EOFError, 'in getflag' + str(args)
-	for n in c:
-		m = m + `ord(n)`
-
-def getbyte(f, *args):
-	c = f.read(1)
-	if not c:
-		raise EOFError, 'in getbyte' + str(args)
-	return ord(c)
-
-def getword(f, *args):
-	getalign(f)
-	s = f.read(2)
-	if len(s) < 2:
-		raise EOFError, 'in getword' + str(args)
-	return (ord(s[0])<<8) | ord(s[1])
-
-def getlong(f, *args):
-	getalign(f)
-	s = f.read(4)
-	if len(s) < 4:
-		raise EOFError, 'in getlong' + str(args)
-	return (ord(s[0])<<24) | (ord(s[1])<<16) | (ord(s[2])<<8) | ord(s[3])
-
-def getostype(f, *args):
-	getalign(f)
-	s = f.read(4)
-	if len(s) < 4:
-		raise EOFError, 'in getostype' + str(args)
-	return s
-
-def getpstr(f, *args):
-	c = f.read(1)
-	if len(c) < 1:
-		raise EOFError, 'in getpstr[1]' + str(args)
-	nbytes = ord(c)
-	if nbytes == 0: return ''
-	s = f.read(nbytes)
-	if len(s) < nbytes:
-		raise EOFError, 'in getpstr[2]' + str(args)
-	return s
-
-def getalign(f):
-	if f.tell() & 1:
-		c = f.read(1)
-		##if c <> '\0':
-		##	print 'align:', `c`
-
-def getlist(f, description, getitem):
-	count = getword(f)
-	list = []
-	for i in range(count):
-		list.append(generic(getitem, f))
-		getalign(f)
-	return list
-
-def alt_generic(what, f, *args):
-	print "generic", `what`, args
-	res = vageneric(what, f, args)
-	print '->', `res`
-	return res
-
-def generic(what, f, *args):
-	if type(what) == types.FunctionType:
-		return apply(what, (f,) + args)
-	if type(what) == types.ListType:
-		record = []
-		for thing in what:
-			item = apply(generic, thing[:1] + (f,) + thing[1:])
-			record.append(item)
-	return record
-	return "BAD GENERIC ARGS: %s" % `what`
-
-getdata = [
-	(getostype, "type"),
-	(getpstr, "description"),
-	(getword, "flags")
-	]
-getargument = [
-	(getpstr, "name"),
-	(getostype, "keyword"),
-	(getdata, "what")
-	]
-getevent = [
-	(getpstr, "name"),
-	(getpstr, "description"),
-	(getostype, "suite code"),
-	(getostype, "event code"),
-	(getdata, "returns"),
-	(getdata, "accepts"),
-	(getlist, "optional arguments", getargument)
-	]
-getproperty = [
-	(getpstr, "name"),
-	(getostype, "code"),
-	(getdata, "what")
-	]
-getelement = [
-	(getostype, "type"),
-	(getlist, "keyform", getostype)
-	]
-getclass = [
-	(getpstr, "name"),
-	(getostype, "class code"),
-	(getpstr, "description"),
-	(getlist, "properties", getproperty),
-	(getlist, "elements", getelement)
-	]
-getcomparison = [
-	(getpstr, "operator name"),
-	(getostype, "operator ID"),
-	(getpstr, "operator comment"),
-	]
-getenumerator = [
-	(getpstr, "enumerator name"),
-	(getostype, "enumerator ID"),
-	(getpstr, "enumerator comment")
-	]
-getenumeration = [
-	(getostype, "enumeration ID"),
-	(getlist, "enumerator", getenumerator)
-	]
-getsuite = [
-	(getpstr, "suite name"),
-	(getpstr, "suite description"),
-	(getostype, "suite ID"),
-	(getword, "suite level"),
-	(getword, "suite version"),
-	(getlist, "events", getevent),
-	(getlist, "classes", getclass),
-	(getlist, "comparisons", getcomparison),
-	(getlist, "enumerations", getenumeration)
-	]
-getaete = [
-	(getbyte, "major version in BCD"),
-	(getbyte, "minor version in BCD"),
-	(getword, "language code"),
-	(getword, "script code"),
-	(getlist, "suites", getsuite)
-	]
-
-def compileaete(aete):
-	"""Generate dictionary for a full aete resource."""
-	[major, minor, language, script, suites] = aete
-	suitedict = {}
-	gsuites = openaeut()
-	for gsuite in gsuites:
-		if gsuite[0] == 'AppleScript Suite':
-			suite = gsuite
-			suite = compilesuite(suite)
-			suitedict[identify(suite[0])] = suite[1:]
-	for suite in suites:
-		if language == LANG:
-			suitecode = suite[2]
-			if suite[5] == []:
-				for gsuite in gsuites:
-					if suitecode == gsuite[2]:
-						suite = gsuite
-			suite = compilesuite(suite)
-			suitedict[identify(suite[0])] = suite[1:]
-	suitedict = combinesuite(suitedict)
-	return suitedict
-			
-def compilesuite(suite):
-	"""Generate dictionary for a single suite"""
-	[name, desc, code, level, version, events, classes, comps, enums] = suite
-	eventdict ={}
-	classdict = {}
-	enumdict ={}
-	for event in events:
-		if event[6]:
-			for ev in event[6]:
-				ev[0] = identify(ev[:2])
-		eventdict[identify(event[:2])] = event[1:]
-	for klass in classes:
-		if klass[3]:
-			for kl in klass[3]:
-				kl[0] = identify(kl[:2])
-		classdict[identify(klass[:2])] = klass[1:]
-	for enum in enums:
-		enumdict[enum[0]] = enum[1]
-	return name, eventdict, classdict, enumdict
-		
-def combinesuite(suite):
-	"""Combines suite dictionaries to seperate event, class, enumeration dictionaries
-	"""
-	
-	suitelist = []
-	eventDict ={}
-	classDict ={}
-	enumDict ={}
-	for value in suite.values():
-		for key in value[0].keys():
-			val = value[0][key]
-			eventDict[key] = val
-		for key in value[1].keys():
-			val = value[1][key]
-			if key in classDict.keys():
-				nval = classDict[key][2]
-				val[2] = val[2] + nval
-			classDict[key] = val
-		for key in value[2].keys():
-			val = value[2][key]
-			enumDict[key] = val
-	return 	eventDict, classDict, enumDict
-		
-
-illegal_ids = [ "for", "in", "from", "and", "or", "not", "print", "class", "return",
-	"def", "name", 'data' ]
-
-def identify(str):
-	"""Turn any string into an identifier:
-	- replace space by _
-	- remove ',' and '-'
-	capitalise
-	"""
-	if not str[0]:
-		if str[1] == 'c@#!':
-			return "Every"
-		else:
-			return 'Any'
-	rv = string.replace(str[0], ' ', '_')
-	rv = string.replace(rv, '-', '')
-	rv = string.replace(rv, ',', '')
-	rv = string.capitalize(rv)
-	return rv
-
-
-def openaete(app):
-	"""open and read the aete of the target application"""
-	arguments['----'] = LANG
-	_aete = AETE(app)
-	_reply, _arguments, _attributes = _aete.send(kASAppleScriptSuite, kGetAETE, arguments, attributes)
-	if _arguments.has_key('errn'):
-		raise baetools.Error, baetools.decodeerror(_arguments)
-	return  _arguments
-
-def openaeut():
-	"""Open and read a aeut file.
-	XXXXX This has been temporarily hard coded until a Python aeut is written XXXX"""
-
-	fullname = dialect
-	rf = OpenRFPerm(fullname, 0, 1)
-	try:
-		UseResFile(rf)
-		resources = []
-		for i in range(Count1Resources('aeut')):
-			res = Get1IndResource('aeut', 1+i)
-			resources.append(res)
-		for res in resources:
-			data = res.data
-			data = decode(data)[4]
-	finally:
-		CloseResFile(rf)
-	return data
-	
-def dialect():
-	"""find the correct Dialect file"""
-
-	dialect = lang[LANG] + " Dialect"
-	try:
-		##System 8
-		vRefNum, dirID = macfs.FindFolder(kOnSystemDisk, kScriptingAdditionsFolderType, 0)
-		fss = macfs.FSSpec((vRefNum, dirID, ''))
-		fss = fss.as_pathname()
-	except macfs.error:
-		##Sytem 7
-		vRefNum, dirID = macfs.FindFolder(kOnSystemDisk, kExtensionFolderType, 0)
-		fss = macfs.FSSpec((vRefNum, dirID, ''))
-		fss = fss.as_pathname()
-		fss = macpath.join(fss, "Scripting Additions")
-	fss = macpath.join(fss, "Dialect")
-	fss = macpath.join(fss, dialect)
-	return fss
-	
-	
-#def openosax():
-#	"""Open and read the aetes of osaxen in the scripting additions folder"""
-#
-#	# System 7.x
-#	aete = []
-#	vRefNum, dirID = macfs.FindFolder(kOnSystemDisk, kExtensionFolderType, 0)
-#	fss = macfs.FSSpec((vRefNum, dirID, ''))
-#	fss = fss.as_pathname()
-#	osax = macpath.join(fss, "Scripting Additions")
-#	for file in os.listdir(osax):
-#		fullname = macpath.join(osax, file)
-#		print fullname
-#		rf = OpenRFPerm(fullname, 0, 1)
-#		try:
-#			UseResFile(rf)
-#			resources = []
-#			for i in range(Count1Resources('aete')):
-#				res = Get1IndResource('aete', 1+i)
-#				resources.append(res)
-#			for res in resources:
-#				data = res.data
-#				data = decode(data)[4]
-#		finally:
-#			CloseResFile(rf)
-#		aete.append(data)
-#	print data
-
-
-#The following should be replaced by direct access to a python 'aeut'
-
-def _launch(appfile):
-	"""Open a file thru the finder. Specify file by name or fsspec"""
-
-#	from PythonScript import PyScript
-	import baetypes
-	_finder = AETE('MACS')
-	parameters ={}
-	parameters['----'] = eval("baetypes.ObjectSpecifier('%s', '%s', %s)" % ('appf', 'ID  ', `appfile`))
-	_reply, _arguments, _attributes = _finder.send( 'aevt', 'odoc', parameters , attributes = {})
-	if _arguments.has_key('errn'):
-		raise baetools.Error, baetools.decodeerror(_arguments)
-	# XXXX Optionally decode result
-	if _arguments.has_key('----'):
-		return _arguments['----']
-
-
-
-if __name__ == '__main__':
-#	import profile
-#	profile.run('Getaete(app)', 'Getaeteprof')
-	Getaete(app)
-#	openosax()
-#	openaete('ascr')
-#	sys.exit(1)
diff --git a/Mac/Unsupported/PythonScript/printaete.py b/Mac/Unsupported/PythonScript/printaete.py
deleted file mode 100644
index b105d8a..0000000
--- a/Mac/Unsupported/PythonScript/printaete.py
+++ /dev/null
@@ -1,346 +0,0 @@
-"""
-Produces a human readable file of an application's aete
-
-v.02 january 29, 1998 bug fix Main()
-v.03 january 31, 1998 added support for inheriting suites from aeut
-v.04 april 16, 1998 Changed identify to match getaete
-"""
-
-import aetools
-import sys
-import MacOS
-import StringIO
-import types
-import macfs
-import string
-import macpath
-from Carbon.Res import *
-
-# for testing only
-app = 'MACS'#CSOm'#'nwSP'#'ezVu'#
-
-#Dialect file hard coded as a tempoary measure
-DIALECT = 'Hermit:System Folder:Scripting Additions:Dialects:English Dialect'
-
-#Restrict the application suites to the dialect we want to use.
-LANG = 0 # 0 = English, 1 = French, 11 = Japanese
-
-#The following are neaded to open the application aete
-kASAppleScriptSuite	= 'ascr'
-kGetAETE			= 'gdte'
-attributes = {}
-arguments = {}
-
-class AETE(aetools.TalkTo):
-	pass
-	
-def Main(appl):
-	fss, ok = macfs.PromptGetFile('Application to work on', 'FNDR', 'APPL')#
-	if not ok:
-		return
-	app = fss.GetCreatorType()[0]
-	path = macpath.split(sys.argv[0])[0]
-	appname =  macpath.split(fss.as_pathname())[1]
-	appname = appname + '.aete'
-	appname = macpath.join(path, appname)
-	try:
-		data = Getaete(app)
-	except MacOS.Error, msg:
-		if msg[0] == -609:
-			_launch(app)
-			data = Getaete(app)
-#	print data
-	data = decode(data['----'].data)
-	data = compileaete(data, appname)
-	
-	
-def decode(data):
-	"""Decode an aete into a python data structure"""
-	f = StringIO.StringIO(data)
-	aete = generic(getaete, f)
-	aete = simplify(aete)
-	return aete
-
-def simplify(item):
-	"""Recursively replace singleton tuples by their constituent item"""
-	if type(item) is types.ListType:
-		return map(simplify, item)
-	elif type(item) == types.TupleType and len(item) == 2:
-		return simplify(item[1])
-	else:
-		return item
-
-
-## Here follows the aete resource decoder.
-## It is presented bottom-up instead of top-down because there are  direct
-## references to the lower-level part-decoders from the high-level part-decoders.
-#
-def getbyte(f, *args):
-	c = f.read(1)
-	if not c:
-		raise EOFError, 'in getbyte' + str(args)
-	return ord(c)
-
-def getword(f, *args):
-	getalign(f)
-	s = f.read(2)
-	if len(s) < 2:
-		raise EOFError, 'in getword' + str(args)
-	return (ord(s[0])<<8) | ord(s[1])
-
-def getlong(f, *args):
-	getalign(f)
-	s = f.read(4)
-	if len(s) < 4:
-		raise EOFError, 'in getlong' + str(args)
-	return (ord(s[0])<<24) | (ord(s[1])<<16) | (ord(s[2])<<8) | ord(s[3])
-
-def getostype(f, *args):
-	getalign(f)
-	s = f.read(4)
-	if len(s) < 4:
-		raise EOFError, 'in getostype' + str(args)
-	return s
-
-def getpstr(f, *args):
-	c = f.read(1)
-	if len(c) < 1:
-		raise EOFError, 'in getpstr[1]' + str(args)
-	nbytes = ord(c)
-	if nbytes == 0: return ''
-	s = f.read(nbytes)
-	if len(s) < nbytes:
-		raise EOFError, 'in getpstr[2]' + str(args)
-	return s
-
-def getalign(f):
-	if f.tell() & 1:
-		c = f.read(1)
-		##if c <> '\0':
-		##	print 'align:', `c`
-
-def getlist(f, description, getitem):
-	count = getword(f)
-	list = []
-	for i in range(count):
-		list.append(generic(getitem, f))
-		getalign(f)
-	return list
-
-def alt_generic(what, f, *args):
-	print "generic", `what`, args
-	res = vageneric(what, f, args)
-	print '->', `res`
-	return res
-
-def generic(what, f, *args):
-	if type(what) == types.FunctionType:
-		return apply(what, (f,) + args)
-	if type(what) == types.ListType:
-		record = []
-		for thing in what:
-#			print thing
-			item = apply(generic, thing[:1] + (f,) + thing[1:])
-			record.append((thing[1], item))
-		return record
-	return "BAD GENERIC ARGS: %s" % `what`
-
-getdata = [
-	(getostype, "type"),
-	(getpstr, "description"),
-	(getword, "flags")
-	]
-getargument = [
-	(getpstr, "name"),
-	(getostype, "keyword"),
-	(getdata, "what")
-	]
-getevent = [
-	(getpstr, "name"),
-	(getpstr, "description"),
-	(getostype, "suite code"),
-	(getostype, "event code"),
-	(getdata, "returns"),
-	(getdata, "accepts"),
-	(getlist, "optional arguments", getargument)
-	]
-getproperty = [
-	(getpstr, "name"),
-	(getostype, "code"),
-	(getdata, "what")
-	]
-getelement = [
-	(getostype, "type"),
-	(getlist, "keyform", getostype)
-	]
-getclass = [
-	(getpstr, "name"),
-	(getostype, "class code"),
-	(getpstr, "description"),
-	(getlist, "properties", getproperty),
-	(getlist, "elements", getelement)
-	]
-getcomparison = [
-	(getpstr, "operator name"),
-	(getostype, "operator ID"),
-	(getpstr, "operator comment"),
-	]
-getenumerator = [
-	(getpstr, "enumerator name"),
-	(getostype, "enumerator ID"),
-	(getpstr, "enumerator comment")
-	]
-getenumeration = [
-	(getostype, "enumeration ID"),
-	(getlist, "enumerator", getenumerator)
-	]
-getsuite = [
-	(getpstr, "suite name"),
-	(getpstr, "suite description"),
-	(getostype, "suite ID"),
-	(getword, "suite level"),
-	(getword, "suite version"),
-	(getlist, "events", getevent),
-	(getlist, "classes", getclass),
-	(getlist, "comparisons", getcomparison),
-	(getlist, "enumerations", getenumeration)
-	]
-getaete = [
-	(getword, "major/minor version in BCD"),
-	(getword, "language code"),
-	(getword, "script code"),
-	(getlist, "suites", getsuite)
-	]
-
-def compileaete(aete, appname):
-	"""Generate dictionary file for a full aete resource."""
-	[version, language, script, suites] = aete
-	major, minor = divmod(version, 256)
-	fp = open(appname, 'w')
-	
-	fp.write('%s:\n' % (appname))
-	fp.write("AETE resource version %d/%d, language %d, script %d\n" % \
-		(major, minor, language, script))
-	fp.write('\n\n')
-	gsuites = openaeut()
-	for suite in suites:
-		if language == LANG:
-			suitecode = suite[2]
-			if suite[5] == []:
-				for gsuite in gsuites:
-					if suitecode == gsuite[2]:
-						suite = gsuite
-			[name, desc, code, level, version, events, classes, comps, enums] = suite
-			fp.write('\n%s Suite: %s\n' % (name, desc))
-			fp.write('\n\tEvents:\n')
-			for event in events:
-				fp.write('\n\t%s: %s\n' % (identify(event[0]), event[1]))
-				fp.write('\t\t%s: %s -- %s\n' % (identify(event[0]), event[5][1], event[5][0]))
-				fp.write('\t\tResult: %s -- %s\n' % (event[4][1], event[4][0]))
-				for ev in event[6]:
-					fp.write('\t\t\t%s: %s -- %s\n' % (identify(ev[0]), ev[2][0], ev[2][1]))
-			fp.write('\n\tClasses')
-			for klass in classes:
-				fp.write('\n\t%s: %s\n' % (identify(klass[0]), klass[2]))
-				if klass[3]:
-					if not klass[3][0][0]: continue
-					fp.write('\t\tProperties\n')
-					for cl in klass[3]:
-						fp.write('\t\t\t%s: %s -- %s\n' % (identify(cl[0]), cl[2][1], cl[2][0]))#,, cl[3][3][1]))
-				if klass[4]:
-					fp.write('\n\t\t\tElements\n')
-					for cl in klass[4]:
-						fp.write('\t\t\t\t%s: %s\n' % (identify(cl[0]), cl[1]))
-						
-				
-					
-		
-	
-
-illegal_ids = [ "for", "in", "from", "and", "or", "not", "print", "class", "return",
-	"def", "name" ]
-
-def identify(str):
-	"""Turn any string into an identifier:
-	- replace space by _
-	- prepend _ if the result is a python keyword
-	"""
-
-	rv = string.replace(str, ' ', '_')
-	rv = string.replace(rv, '-', '')
-	rv = string.replace(rv, ',', '')
-	rv = string.capitalize(rv)
-	return rv
-
-
-def Getaete(app):
-	'''Read the target aete'''
-	arguments['----'] = LANG
-	_aete = AETE(app)
-	_reply, _arguments, _attributes = _aete.send('ascr', 'gdte', arguments, attributes)
-	if _arguments.has_key('errn'):
-		raise aetools.Error, aetools.decodeerror(_arguments)
-	return  _arguments
-
-def openaeut():
-	"""Open and read a aeut file.
-	XXXXX This has been temporarily hard coded until a Python aeut is written XXXX"""
-
-	fullname = DIALECT
-	
-	rf = OpenRFPerm(fullname, 0, 1)
-	try:
-		UseResFile(rf)
-		resources = []
-		for i in range(Count1Resources('aeut')):
-			res = Get1IndResource('aeut', 1+i)
-			resources.append(res)
-		for res in resources:
-			data = res.data
-			data = decode(data)[3]
-	finally:
-		CloseResFile(rf)
-	return data
-
-
-#The following should be replaced by direct access to a python 'aeut'
-
-class _miniFinder(aetools.TalkTo):
-	def open(self, _object, _attributes={}, **_arguments):
-		"""open: Open the specified object(s)
-		Required argument: list of objects to open
-		Keyword argument _attributes: AppleEvent attribute dictionary
-		"""
-		_code = 'aevt'
-		_subcode = 'odoc'
-
-		if _arguments: raise TypeError, 'No optional args expected'
-		_arguments['----'] = _object
-
-
-		_reply, _arguments, _attributes = self.send(_code, _subcode,
-				_arguments, _attributes)
-		if _arguments.has_key('errn'):
-			raise aetools.Error, aetools.decodeerror(_arguments)
-		# XXXX Optionally decode result
-		if _arguments.has_key('----'):
-			return _arguments['----']
-	
-_finder = _miniFinder('MACS')
-
-def _launch(appfile):
-	"""Open a file thru the finder. Specify file by name or fsspec"""
-	_finder.open(_application_file(('ID  ', appfile)))
-
-
-class _application_file(aetools.ComponentItem):
-	"""application file - An application's file on disk"""
-	want = 'appf'
-	
-_application_file._propdict = {
-}
-_application_file._elemdict = {
-}
-
-Main(app)
-sys.exit(1)
diff --git a/Mac/Unsupported/PythonScript/testeudora.py b/Mac/Unsupported/PythonScript/testeudora.py
deleted file mode 100644
index ba676a3..0000000
--- a/Mac/Unsupported/PythonScript/testeudora.py
+++ /dev/null
@@ -1,44 +0,0 @@
-"""A test program that allows us to control Eudora"""
-
-import sys
-import MacOS
-import PythonScript
-	
-# The Creator signature of eudora:
-SIGNATURE="CSOm"
-TIMEOUT = 10*60*60
-
-
-
-def main():
-	PythonScript.PsScript(SIGNATURE, TIMEOUT)
-	talker = PythonScript.PyScript
-	ev = PythonScript.PsEvents
-	pc = PythonScript.PsClass
-	while 1:
-		print 'get, put, name (of first folder), list (foldernames), quit (eudora) or exit (this program) ?'
-		line = sys.stdin.readline()
-		try:
-			if line[0] == 'g':
-				print 'check'
-				print talker(ev.Activate)
-				print talker(ev.Connect, Checking=1)
-			elif line[0] == 'p':
-				print talker(ev.Connect, Sending=1)
-			elif line[0] == 'n':
-				id = talker(ev.Get, pc.Mail_folder("").Mailbox(1).Name())
-				print "It is called", id, "\n"
-			elif line[0] == 'l':
-				id = talker(ev.Count, pc.Mail_folder(""), Each='Mailbox')
-				print "There are", id, "mailboxes"
-			elif line[0] == 'q':
-				print talker(ev.Quit)
-			elif line[0] == 'e':
-				break
-		except MacOS.Error, arg:
-			if arg[0] == -609:
-				print 'Connection invalid, is eudora running?'
-			else:
-				print 'MacOS Error:', arg[1]
-			
-main()
diff --git a/Mac/Unsupported/RunLibScript.py b/Mac/Unsupported/RunLibScript.py
deleted file mode 100644
index 6ecf643..0000000
--- a/Mac/Unsupported/RunLibScript.py
+++ /dev/null
@@ -1,111 +0,0 @@
-"""Import a module while pretending its name is __main__. This
-can be used to run scripts from the PackedLib resource file while pretending
-they have been double-clicked."""
-
-import imp
-import sys
-import os
-import string
-from Carbon import Dlg
-import macfs
-
-DIALOG_ID = 512
-OK = 1
-CANCEL = 2
-SCRIPTNAME=3
-ARGV=4
-STDIN_CONS=5
-STDIN_FILE=6
-STDOUT_CONS=7
-STDOUT_FILE=8
-WORKING_DIR=9
-PAUSE=10
-
-def import_as_main(name):
-	fp, path, (suffix, mode, type) = imp.find_module(name)
-	if type == imp.PY_SOURCE:
-		imp.load_source('__main__', path, fp)
-	elif type == imp.PY_COMPILED:
-		imp.load_compiled('__main__', path, fp)
-	elif type == imp.PY_RESOURCE:
-		imp.load_resource('__main__', path)
-		
-def interact():
-	d = Dlg.GetNewDialog(DIALOG_ID, -1)
-	wdir = stdin = stdout = None
-	pause = 0
-
-	tp, in_c_h, rect = d.GetDialogItem(STDIN_CONS)
-	tp, in_f_h, rect = d.GetDialogItem(STDIN_FILE)
-	tp, out_c_h, rect = d.GetDialogItem(STDOUT_CONS)
-	tp, out_f_h, rect = d.GetDialogItem(STDOUT_FILE)
-	tp, pause_h, rect = d.GetDialogItem(PAUSE)
-	in_c_h = in_c_h.as_Control()
-	in_f_h = in_f_h.as_Control()
-	out_c_h = out_c_h.as_Control()
-	out_f_h = out_f_h.as_Control()
-	pause_h = pause_h.as_Control()
-
-	while 1:
-		in_c_h.SetControlValue(not stdin)
-		in_f_h.SetControlValue(not not stdin)
-		out_c_h.SetControlValue(not stdout)
-		out_f_h.SetControlValue(not not stdout)
-		pause_h.SetControlValue(pause)
-		
-		n = Dlg.ModalDialog(None)
-		if n == OK:
-			break
-		elif n == CANCEL:
-			sys.exit(0)
-		elif n == STDIN_CONS:
-			stdin = None
-		elif n == STDIN_FILE:
-			fss, ok = macfs.StandardGetFile('TEXT')
-			if ok:
-				stdin = fss
-		elif n == STDOUT_FILE:
-			fss, ok = macfs.StandardPutFile('stdout:')
-			if ok:
-				stdout = fss
-		elif n == WORKING_DIR:
-			fss, ok = macfs.GetDirectory()
-			if ok:
-				wdir = fss
-		elif n == PAUSE:
-			pause = (not pause)
-		
-	tp, h, rect = d.GetDialogItem(SCRIPTNAME)
-	name = Dlg.GetDialogItemText(h)
-	tp, h, rect = d.GetDialogItem(ARGV)
-	argv = Dlg.GetDialogItemText(h)
-	return name, argv, stdin, stdout, wdir, pause
-	
-def main():
-	curdir = os.getcwd()
-	from Carbon import Res
-	try:
-		Res.FSpOpenResFile('RunLibScript.rsrc', 1)
-	except:
-		pass # Assume we're an applet already
-	name, argv, stdin, stdout, wdir, pause = interact()
-	if not name:
-		sys.exit(0)
-	sys.argv = [name] + string.split(argv)
-	if stdin:
-		sys.stdin = open(stdin.as_pathname())
-	if stdout:
-		sys.stdout = open(stdout.as_pathname(), 'w')
-	if wdir:
-		os.chdir(wdir.as_pathname())
-	else:
-		os.chdir(curdir)
-
-	import_as_main(name)
-
-	if pause:
-		sys.exit(1)
-	
-if __name__ == '__main__':
-	main()
-			
diff --git a/Mac/Unsupported/RunLibScript.rsrc b/Mac/Unsupported/RunLibScript.rsrc
deleted file mode 100644
index fea753c..0000000
--- a/Mac/Unsupported/RunLibScript.rsrc
+++ /dev/null
diff --git a/Mac/Unsupported/binhextree.py b/Mac/Unsupported/binhextree.py
deleted file mode 100644
index 1d6996e..0000000
--- a/Mac/Unsupported/binhextree.py
+++ /dev/null
@@ -1,240 +0,0 @@
-#
-# binhextree - Recursively descend a directory and
-# pack all resource files.
-#
-# Actually it doesn't binhex anymore, it only copies projects.
-#
-# Jack Jansen, CWI, August 1995.
-#
-
-import os
-import binhex
-import sys
-import macostools
-import macfs
-
-import aetools
-from Metrowerks_Shell_Suite import Metrowerks_Shell_Suite
-from Required_Suite import Required_Suite 
-
-class MwShell(aetools.TalkTo, Metrowerks_Shell_Suite, Required_Suite):
-	pass
-
-# Top-level directory
-TOP=''
-
-# Where to put CW projects, relative to TOP
-CWDIR=':Mac:mwerks:projects'
-# From which folders to put projects there
-CWDIRDIRS=['build.mac', 'build.macstand', 'build.macfreeze', 'PlugIns']
-
-# Helper routines
-def binhexit(path, name):
-	dstfile = path + '.hqx'
-	if os.path.exists(dstfile):
-		print 'Compare', path,'...',
-		if binhexcompare(path, dstfile):
-			print 'Identical, skipped.'
-			return
-		else:
-			print 'Not up-to-date.'
-	print 'Binhexing', path
-	binhex.binhex(path, dstfile)
-	
-def binhexcompare(source, hqxfile):
-	"""(source, hqxfile) - Check whether the two files match (forks only)"""
-	ifp = binhex.HexBin(hqxfile)
-
-	sfp = open(source, 'rb')
-	while 1:
-		d = ifp.read(128000)
-		d2 = sfp.read(128000)
-		if d <> d2:
-			return 0
-		if not d: break
-	sfp.close()
-	ifp.close_data()
-	
-	d = ifp.read_rsrc(128000)
-	if d:
-		sfp = binhex.openrsrc(source, 'rb')
-		d2 = sfp.read(128000)
-		if d <> d2:
-			return 0
-		while 1:
-			d = ifp.read_rsrc(128000)
-			d2 = sfp.read(128000)
-			if d <> d2:
-				return 0
-			if not d: break
-	return 1
-
-# Project files to handle
-project_files = {}
-
-def hexbincwprojects(creator):
-	"""Compact and hexbin all files remembered with a given creator"""
-	cw_running = 0
-	for fss in project_files[creator]:
-		srcfile = fss.as_pathname()
-		
-		old_style = 0
-		if srcfile[-1] == 'µ':
-			dstfile = srcfile[:-1]+'mu.hqx'
-			old_style = 1
-		elif srcfile[-3] == '.mu':
-			dstfile = srcfile + '.hqx'
-		elif ord(srcfile[-1]) >= 128:
-			dstfile = srcfile[:-1]+`ord(srcfile[-1])`+'.hqx'
-		else:
-			dstfile = srcfile + '.hqx'
-			
-		if os.path.exists(dstfile) and \
-				os.stat(dstfile)[8] >= os.stat(srcfile)[8]:
-			print 'Skip', dstfile,'- Up-to-date'
-			continue
-		print 'Compacting', dstfile
-		if old_style:
-			if not cw_running:
-				try:
-					mgr = MwShell(creator, start=1)
-				except 'foo':
-					print 'Not handled:', creator
-					return
-				cw_running = 1
-			mgr.open(fss)
-			mgr.Reset_File_Paths()
-			mgr.Remove_Binaries()
-			mgr.Close_Project()
-		
-		print 'Binhexing', dstfile
-		binhex.binhex(srcfile, dstfile)
-	if cw_running:
-		mgr.quit()
-	
-def copycwproject(path, name):
-	"""Copy CW project (if needed) and remember for hexbinning"""
-	global project_files
-	
-	dstdir = os.path.join(TOP, CWDIR)
-	if path[:len(dstdir)] == dstdir:
-		return
-	srcdir = os.path.split(path)[0]
-	srcdir = os.path.split(srcdir)[1]
-	if srcdir in CWDIRDIRS:
-		if not os.path.exists(dstdir):
-			print dstdir
-			print 'No CW-project dir, skip', name
-			return
-		dstfile = os.path.join(dstdir, os.path.join(srcdir, name))
-	else:
-		if path[-2:] == '.µ':
-			dstfile = path[:-2]+ '.mu'
-		elif path[-4:] == '.prj':
-			dstfile = None
-		else:
-			return
-
-	if dstfile:
-		# If the destination doesn't exists or is older that the source
-		# we copy and remember it
-		
-		if os.path.exists(dstfile) and \
-				os.stat(dstfile)[8] >= os.stat(path)[8]:
-			print 'Not copying', path,'- Up-to-date'
-		else:
-			print 'Copy', path
-			macostools.copy(path, dstfile)
-	else:
-		dstfile = path
-	
-	fss = macfs.FSSpec(dstfile)
-	creator = fss.GetCreatorType()[0]
-	
-	if project_files.has_key(creator):
-		project_files[creator].append(fss)
-	else:
-		project_files[creator] = [fss]	
-	
-def copycwexpfile(path, name):
-	"""Copy CW export file"""
-	global project_files
-	
-	dstdir = os.path.join(TOP, CWDIR)
-	if path[:len(dstdir)] == dstdir:
-		return
-	srcdir = os.path.split(path)[0]
-	srcdir = os.path.split(srcdir)[1]
-	if srcdir in CWDIRDIRS:
-		if not os.path.exists(dstdir):
-			print dstdir
-			print 'No CW-project dir, skip', name
-			return
-		dstfile = os.path.join(dstdir, os.path.join(srcdir, name))
-	else:
-		if path[-6:] != '.µ.exp':
-			return
-		dstfile = path[:-6] + '.mu.exp'
-	if dstfile[-6:] == '.µ.exp':
-		dstfile = dstfile[:-6]+'.mu.exp'
-
-	# If the destination doesn't exists or is older that the source
-	# we copy and remember it
-	
-	if os.path.exists(dstfile) and \
-			os.stat(dstfile)[8] >= os.stat(path)[8]:
-		print 'Not copying', path,'- Up-to-date'
-	else:
-		print 'Copy', path
-		macostools.copy(path, dstfile)	
-
-extensions = [
-##	('.rsrc', binhexit),
-##	('.gif', binhexit),
-	('.µ', copycwproject),
-	('.prj', copycwproject),
-	('.prj.exp', copycwexpfile),
-	('.µ.exp', copycwexpfile)
-	]
-
-def walker(arg, top, names):
-	lnames = names[:]
-	for n in lnames:
-		if n[0] == '(' and n[-1] == ')':
-			names.remove(n)
-			continue
-		for ext, handler in extensions:
-			if n[-len(ext):] == ext:
-				name = os.path.join(top, n)
-				handler(name, n)
-				
-def dodir(name):
-	global TOP, project_files
-	TOP = name
-	os.path.walk(name, walker, None)
-	
-##	for creator in project_files.keys():
-##		hexbincwprojects(creator)
-	project_files = {}
-				
-def main():
-	if len(sys.argv) > 1:
-		for dir in sys.argv[1:]:
-			dodir(dir)
-	elif os.name == 'mac':
-		import macfs
-		dir, ok = macfs.GetDirectory('Folder to search:')
-		if not ok:
-			sys.exit(0)
-		dodir(dir.as_pathname())
-	else:
-		print 'Usage: hexbintree dir ...'
-		sys.exit(1)
-	if os.name == 'mac':
-		sys.exit(1)   # Keep window
-	else:
-		sys.exit(0)
-		
-if __name__ == '__main__':
-	main()
-	
diff --git a/Mac/Unsupported/findmodulefiles.py b/Mac/Unsupported/findmodulefiles.py
deleted file mode 100644
index 6b3642e..0000000
--- a/Mac/Unsupported/findmodulefiles.py
+++ /dev/null
@@ -1,94 +0,0 @@
-"""Findmodulefiles - Find out where modules are loaded from.
-Run findmodulefiles() after running a program with "python -i". The
-resulting file list can be given to mkfrozenresources or to a
-(non-existent) freeze-like application.
-
-findmodulefiles will create a file listing all modules and where they have
-been imported from.
-
-findunusedbuiltins takes a list of (modules, file) and prints all builtin modules
-that are _not_ in the list. The list is created by opening the findmodulefiles
-output, reading it and eval()ing that.
-
-mkpycresource takes a list of (module, file) and creates a resourcefile with all those
-modules and (optionally) a main module.
-"""
-
-def findmodulefiles(output=None):
-	"""Produce a file containing a list of (modulename, filename-or-None)
-	tuples mapping module names to source files"""
-	# Immedeately grab the names
-	import sys
-	module_names = sys.modules.keys()[:]
-	import os
-	if not output:
-		if os.name == 'mac':
-			import macfs
-			
-			output, ok = macfs.StandardPutFile('Module file listing output:')
-			if not ok: sys.exit(0)
-			output = output.as_pathname()
-	if not output:
-		output = sys.stdout
-	elif type(output) == type(''):
-		output = open(output, 'w')
-	output.write('[\n')
-	for name in module_names:
-		try:
-			source = sys.modules[name].__file__
-		except AttributeError:
-			source = None
-		else:
-			source = `source`
-		output.write('\t(%s,\t%s),\n' % (`name`, source))
-	output.write(']\n')
-	del output
-	
-def findunusedbuiltins(list):
-	"""Produce (on stdout) a list of unused builtin modules"""
-	import sys
-	dict = {}
-	for name, location in list:
-		if location == None:
-			dict[name] = 1
-	for name in sys.builtin_module_names:
-		if not dict.has_key(name):
-			print 'Unused builtin module:', name
-			
-
-def mkpycresourcefile(list, main='', dst=None):
-	"""Copy list-of-modules to resource file dst."""
-	import py_resource
-	from Carbon import Res
-	import sys
-	
-	if dst == None:
-		import macfs
-		fss, ok = macfs.StandardPutFile("PYC Resource output file")
-		if not ok: sys.exit(0)
-		dst = fss.as_pathname()
-	if main == '':
-		import macfs
-		fss, ok = macfs.PromptGetFile("Main program:", "TEXT")
-		if ok:
-			main = fss.as_pathname()
-	
-	fsid = py_resource.create(dst)
-
-	if main:
-		id, name = py_resource.frompyfile(main, '__main__', preload=1)
-		print '%5d\t%s\t%s'%(id, name, main)
-	for name, location in list:
-		if not location: continue
-		if location[-4:] == '.pyc':
-			# Attempt corresponding .py
-			location = location[:-1]
-		if location[-3:] != '.py':
-			print '*** skipping', location
-			continue
-		id, name = py_resource.frompyfile(location, name, preload=1)
-		print '%5d\t%s\t%s'%(id, name, location)
-
-	Res.CloseResFile(fsid)
-
-			
diff --git a/Mac/Unsupported/fixgusidir.py b/Mac/Unsupported/fixgusidir.py
deleted file mode 100644
index 53ca5ba..0000000
--- a/Mac/Unsupported/fixgusidir.py
+++ /dev/null
@@ -1,89 +0,0 @@
-# fixgusidir - Modify filenames in the CWGUSI source tree, so
-# that it can be put under CVS. Needed because there are files with slashes
-# in their name, which CVS does not approve of.
-#
-# Usage:
-# - On importing gusi in cvs:
-#   - Run the script after unpacking the gusi distribution. This creates
-#     _s_ files for all / files.
-#   - Remove all / files with "find file" or some such.
-#   - import the tree
-# - On checking out gusi:
-#   - After checkout, run the script to create / files for all _s_ files.
-# - After modifying stuff, or later checkouts:
-#   - Run the script. Conflicts between / and _s_ files will be reported.
-#   - Fix the problems by removing the outdated / or _s_ file.
-#   - Run the script again. Possibly do a cvs checkin.
-import macfs
-import os
-import sys
-import re
-
-# Substitution for slashes in filenames
-SUBST = '_s_'
-# Program to find those substitutions
-SUBSTPROG = re.compile(SUBST)
-
-def main():
-	if len(sys.argv) > 1:
-		gusidir = sys.argv[1]
-	else:
-		fss, ok = macfs.GetDirectory("CWGUSI source folder?")
-		if not ok: sys.exit(0)
-		gusidir = fss.as_pathname()
-	fixgusifolder(gusidir)
-	sys.exit(1)
-			
-def fixgusifolder(gusidir):
-	"""Synchronize files with / in their name with their _s_ counterparts"""
-	os.path.walk(gusidir, gusiwalk, None)
-	
-def gusiwalk(dummy, top, names):
-	"""Helper for fixgusifolder: convert a single directory full of files"""
-	# First remember names with slashes and with our slash-substitution
-	macnames = []
-	codenames = []
-	for name in names:
-		if '/' in name:
-			macnames.append(name)
-		if SUBSTPROG.search(name):
-			codenames.append(name)
-	# Next, check whether we need to copy any slash-files to subst-files
-	for name in macnames:
-		if os.path.isdir(name):
-			print '** Folder with slash in name cannot be handled!'
-			sys.exit(1)
-		othername = mac2codename(name)
-		if len(othername) > 31:
-			print '** Converted filename too long:', othername
-			sys.exit(1)
-		if othername in codenames:
-			codenames.remove(othername)
-		sync(os.path.join(top, name), os.path.join(top, othername))
-	# Now codenames contains only files that have no / equivalent
-	for name in codenames:
-		othername = code2macname(name)
-		sync(os.path.join(top, name), os.path.join(top, othername))
-		
-def mac2codename(name):
-	return re.sub('/', SUBST, name)
-	
-def code2macname(name):
-	return re.sub(SUBST, '/', name)
-	
-def sync(old, new):
-	if os.path.exists(new):
-		# Both exist. Check that they are indentical
-		d1 = open(old, 'rb').read()
-		d2 = open(new, 'rb').read()
-		if d1 == d2:
-			print '-- OK         ', old
-			return
-		print '** OUT-OF-SYNC', old
-	fp = open(new, 'wb')
-	fp.write(open(old, 'rb').read())
-	print '-- COPIED     ', old
-	
-if __name__ == '__main__':
-	main()
-	
diff --git a/Mac/Unsupported/mkfrozenresources.py b/Mac/Unsupported/mkfrozenresources.py
deleted file mode 100644
index da09f76..0000000
--- a/Mac/Unsupported/mkfrozenresources.py
+++ /dev/null
@@ -1,39 +0,0 @@
-#
-# Given a module-list generated by findmodulefiles
-# generate the resource file with all needed modules
-#
-import macfs
-import py_resource
-from Carbon import Res
-import sys
-
-def main():
-	fss, ok = macfs.PromptGetFile('Module sources listing:', 'TEXT')
-	if not ok:
-		sys.exit(0)
-	ofss, ok = macfs.StandardPutFile('PYC resource output file:')
-	if not ok:
-		sys.exit(0)
-	mfss, ok = macfs.PromptGetFile('Source for __main__ (or cancel):')
-	if ok:
-		mainfile = mfss.as_pathname()
-	else:
-		mainfile = None
-	fp = open(fss.as_pathname())
-	data = fp.read()
-	modules = eval(data)
-	
-	fsid = py_resource.create(ofss.as_pathname(), creator='RSED')
-	
-	if mainfile:
-		id, name = py_resource.frompyfile(mainfile, '__main__')
-	for module, source in modules:
-		if source:
-			id, name = py_resource.frompyfile(source)
-			print 'Wrote %d %s: %s'%(id, name, source)
-			
-	Res.CloseResFile(fsid)
-	
-if __name__ == '__main__':
-	main()
-	sys.exit(1)
diff --git a/Mac/Unsupported/run.py b/Mac/Unsupported/run.py
deleted file mode 100644
index 75c6129..0000000
--- a/Mac/Unsupported/run.py
+++ /dev/null
@@ -1,41 +0,0 @@
-# Script (applet) to run any Python command
-
-def main():
-	import sys
-	sys.stdout = sys.stderr
-	del sys.argv[:1]
-	if not sys.argv:
-		import macfs
-		srcfss, ok = macfs.StandardGetFile('TEXT')
-		if not ok:
-			return
-		filename = srcfss.as_pathname()
-		sys.argv.append(filename)
-	import __main__
-	try:
-		execfile(sys.argv[0], __main__.__dict__)
-	except SystemExit, msg:
-		if msg:
-			message("Exit status: %s" % str(msg))
-		print "exit", `msg`
-		#sys.exit(msg)
-	except:
-		etype = sys.exc_type
-		if hasattr(etype, "__name__"): etype = etype.__name__
-		message("%s: %s" % (etype, sys.exc_value))
-		print "exit 1"
-		#sys.exit(1)
-
-def message(str = "Hello, world!", id = 256):
-	from Carbon import Dlg
-	d = Dlg.GetNewDialog(id, -1)
-	if not d:
-		print str
-		return
-	tp, h, rect = d.GetDItem(2)
-	Dlg.SetIText(h, str)
-	while 1:
-		n = Dlg.ModalDialog(None)
-		if n == 1: break
-
-main()