ported Jacks changes back to think C

This commit is contained in:
Guido van Rossum 1995-01-18 23:59:06 +00:00
parent f74d4e2a0e
commit 6a5df90918
2 changed files with 14 additions and 2 deletions

View File

@ -8,6 +8,10 @@
/* Define if on Macintosh (THINK_C, MPW or __MWERKS__ should also be defined) */
#define macintosh
#ifdef THINK_C
#define HAVE_FOPENRF
#endif
/* Define if on AIX 3.
System headers sometimes define this.
We just want to avoid a redefinition error message. */

View File

@ -261,13 +261,14 @@ extern void initnew();
extern void initdl();
extern void initsyslog();
extern void initgestalt();
#ifdef THINK
#ifdef THINK_C
extern void initmacconsole();
#endif
extern void initctb();
extern void initmacspeech();
extern void initmacdnr();
extern void initmactcp();
extern void initAE();
/* -- ADDMODULE MARKER 1 -- */
@ -297,14 +298,21 @@ struct {
{"rotor", initrotor},
{"new", initnew},
{"gestalt", initgestalt},
#ifdef THINK
#ifdef THINK_C
{"macconsole", initmacconsole},
#endif
{"ctb", initctb},
#ifdef __MWERKS__
/* This is really "Jack Jansen" specific for now :-) */
{"macspeech", initmacspeech},
{"imgformat", initimgformat},
{"macdnr", initmacdnr},
{"mactcp", initmactcp},
#endif
#ifdef THINK_C
/* This is really "Guido van Rossum" specific... :-) */
{"AE", initAE},
#endif
/* -- ADDMODULE MARKER 2 -- */