diff options
| author | Jack Jansen <jack.jansen@cwi.nl> | 1995-06-27 13:18:14 (GMT) |
|---|---|---|
| committer | Jack Jansen <jack.jansen@cwi.nl> | 1995-06-27 13:18:14 (GMT) |
| commit | f74f63a43f3c4e3d31a0366a2a982e0ded8ef583 (patch) | |
| tree | 7a283806d15a5e953125048c1da5c58488c07120 /Mac/Python | |
| parent | eceb3e3f0a7d0f58ac75b46cc1c907eaf21dd472 (diff) | |
| download | cpython-f74f63a43f3c4e3d31a0366a2a982e0ded8ef583.zip cpython-f74f63a43f3c4e3d31a0366a2a982e0ded8ef583.tar.gz cpython-f74f63a43f3c4e3d31a0366a2a982e0ded8ef583.tar.bz2 | |
Initial port to CodeWarrior CFM68K support (mainly by disabling
unsupported features).
Diffstat (limited to 'Mac/Python')
| -rw-r--r-- | Mac/Python/macapplication.c | 5 | ||||
| -rw-r--r-- | Mac/Python/macgetargv.c | 5 | ||||
| -rw-r--r-- | Mac/Python/macglue.c | 4 |
3 files changed, 12 insertions, 2 deletions
diff --git a/Mac/Python/macapplication.c b/Mac/Python/macapplication.c index bac0620..0028741 100644 --- a/Mac/Python/macapplication.c +++ b/Mac/Python/macapplication.c @@ -24,12 +24,15 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. /* Macintosh Applet Python main program */ -#ifdef __CFM68K__ +#ifdef SYMANTEC__CFM68K__ #pragma lib_export on #endif extern void PyMac_InitApplication(); main() { +#if defined(__MWERKS__) && defined(__CFM68K__) + printf("Hello, world!\n"); +#endif PyMac_InitApplication(); } diff --git a/Mac/Python/macgetargv.c b/Mac/Python/macgetargv.c index 66c6d59..5f2e637 100644 --- a/Mac/Python/macgetargv.c +++ b/Mac/Python/macgetargv.c @@ -50,7 +50,7 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. #define HAVE_UNIVERSAL_HEADERS #endif -#ifdef __CFM68K__ +#ifdef SYMANTEC__CFM68K__ #pragma lib_export on #endif @@ -120,6 +120,9 @@ get_full_path (FSSpec *fss, char *buf) char tmpbuf[256]; int plen; +#if defined(__MWERKS__) && defined(__CFM68K__) + return -1; /* get_folder_parent doesn't work */ +#endif fss_current = *fss; plen = fss_current.name[0]; memcpy(buf, &fss_current.name[1], plen); diff --git a/Mac/Python/macglue.c b/Mac/Python/macglue.c index 38f654f..24667e6 100644 --- a/Mac/Python/macglue.c +++ b/Mac/Python/macglue.c @@ -223,6 +223,9 @@ static void scan_event_queue(flush) int flush; { +#if defined(__MWERKS__) && defined(__CFM68K__) + return; /* No GetEvQHdr yet */ +#else register EvQElPtr q; q = (EvQElPtr) GetEvQHdr()->qHead; @@ -237,6 +240,7 @@ scan_event_queue(flush) break; } } +#endif } int |