Mercurial > cpython-lru_cache-weakref
diff Mac/Python/macapplet.c @ 2378:4e87f3a3f33a legacy-trunk
moved most of it to macglue.c
| author | Guido van Rossum <guido@python.org> |
|---|---|
| date | Sat, 18 Feb 1995 14:56:09 +0000 |
| parents | e80acfa13ac0 |
| children | f0110c5c6227 |
line wrap: on
line diff
--- a/Mac/Python/macapplet.c Sat Feb 18 14:53:14 1995 +0000 +++ b/Mac/Python/macapplet.c Sat Feb 18 14:56:09 1995 +0000 @@ -24,73 +24,12 @@ /* Macintosh Applet Python main program */ -#include "Python.h" -#include "marshal.h" -#include "import.h" - -#include <Memory.h> -#include <Resources.h> -#include <QuickDraw.h> -#include <Fonts.h> -#include <Windows.h> -#include <TextEdit.h> -#include <Dialogs.h> -#include <Menus.h> - -static void -init_mac_world() -{ - MaxApplZone(); - InitGraf(&qd.thePort); - InitFonts(); - InitWindows(); - TEInit(); - InitDialogs((long)0); - InitMenus(); - InitCursor(); -} +#ifdef __CFM68K__ +#pragma lib_export on +#endif -static int -run_main_resource() -{ - Handle h; - long size; - PyObject *code; - PyObject *result; - - h = GetNamedResource('PYC ', "\p__main__"); - if (h == NULL) { - fprintf(stderr, "No 'PYC ' resource named __main__ found\n"); - return 1; - } - size = GetResourceSizeOnDisk(h); - HLock(h); - code = PyMarshal_ReadObjectFromString(*h + 8, (int)(size - 8)); - HUnlock(h); - ReleaseResource(h); - if (code == NULL) { - PyErr_Print(); - return 1; - } - result = PyImport_ExecCodeModule("__main__", code); - Py_DECREF(code); - if (result == NULL) { - PyErr_Print(); - return 1; - } - Py_DECREF(result); - return 0; +extern void PyMac_InitApplet(); + +main() { + PyMac_InitApplet(); } - -main() -{ - static char *argv[] = {"__main__", NULL}; - - init_mac_world(); - Py_Initialize(); - PySys_SetArgv((sizeof argv / sizeof argv[0]) - 1, argv); - run_main_resource(); - fflush(stderr); - fflush(stdout); - /* XXX Should we bother to Py_Exit(sts)? */ -}
