diff options
| author | Guido van Rossum <guido@python.org> | 1995-02-20 23:45:53 (GMT) |
|---|---|---|
| committer | Guido van Rossum <guido@python.org> | 1995-02-20 23:45:53 (GMT) |
| commit | 24a45e3c18ec6ba9bde1a59c7d54d416a48611f9 (patch) | |
| tree | 1363a82f3656a89fb31305df61e8ec28874a3cec /Mac | |
| parent | 850f44b47cd2bf54237ae31def0093180cd9c3d7 (diff) | |
| download | cpython-24a45e3c18ec6ba9bde1a59c7d54d416a48611f9.zip cpython-24a45e3c18ec6ba9bde1a59c7d54d416a48611f9.tar.gz cpython-24a45e3c18ec6ba9bde1a59c7d54d416a48611f9.tar.bz2 | |
ported to MPW, moved main() here
Diffstat (limited to 'Mac')
| -rw-r--r-- | Mac/Python/macglue.c | 46 |
1 files changed, 31 insertions, 15 deletions
diff --git a/Mac/Python/macglue.c b/Mac/Python/macglue.c index 60d6930..cab94ce 100644 --- a/Mac/Python/macglue.c +++ b/Mac/Python/macglue.c @@ -48,6 +48,9 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. #ifndef HAVE_UNIVERSAL_HEADERS #define GetResourceSizeOnDisk(x) SizeResource(x) +typedef DlgHookYDProcPtr DlgHookYDUPP; +#define NewDlgHookYDProc(userRoutine) ((DlgHookYDUPP) (userRoutine)) +typedef FileFilterYDProcPtr FileFilterYDUPP; #endif #include <signal.h> @@ -588,14 +591,12 @@ error: return NULL; } } + /* ** Helper routine for GetDirectory */ -static int -myhook_proc(item, theDialog, dataptr) - short item; - DialogPtr theDialog; - void *dataptr; +static pascal short +myhook_proc(short item, DialogPtr theDialog, void *dataptr) { if ( item == SELECTCUR_ITEM ) { item = sfItemCancelButton; @@ -623,7 +624,7 @@ PyMac_GetDirectory(dirfss) myhook_upp = NewDlgHookYDProc(myhook_proc); upp_inited = 1; } - CustomGetFile((FileFilterUPP)0, 1, list, &reply, GETDIR_ID, where, myhook_upp, + CustomGetFile((FileFilterYDUPP)0, 1, list, &reply, GETDIR_ID, where, myhook_upp, NULL, NULL, NULL, (void *)&select_clicked); reply.sfFile.name[0] = 0; @@ -786,7 +787,26 @@ PyMac_BuildEventRecord(EventRecord *e) } -/* ---------- */ +#ifndef USE_MAC_SHARED_LIBRARY + +/* For normal application */ +void +main() +{ + int argc; + char **argv; + +#ifdef __MWERKS__ + SIOUXSettings.asktosaveonclose = 0; + SIOUXSettings.showstatusline = 0; + SIOUXSettings.tabspaces = 4; +#endif + argc = PyMac_GetArgv(&argv); + Py_Main(argc, argv); +} + +#else /* USE_MAC_SHARED_LIBRARY */ + /* Applet support */ /* Run a compiled Python Python script from 'PYC ' resource __main__ */ @@ -828,16 +848,10 @@ PyMac_InitApplet() { int argc; char **argv; + int err; -#ifdef __MWERKS__ - /* - ** Guido: you should fix this. You should arrange to have the - ** __sinit routine from macshlglue.c called so you can stuff - ** resources into the lib file. - */ +#ifdef USE_MAC_SHARED_LIBRARY PyMac_AddLibResources(); -#else - KABOO! KABOO! #endif #ifdef __MWERKS__ SIOUXSettings.asktosaveonclose = 0; @@ -858,3 +872,5 @@ PyMac_InitApplet() #endif /* XXX Should we bother to Py_Exit(sts)? */ } + +#endif /* USE_MAC_SHARED_LIBRARY */ |