Mirror
/
cpython
mirror of https://github.com/python/cpython
4
1
Fork 0
Code Issues Releases Wiki Activity

ported back to Think C

This commit is contained in:
Guido van Rossum 1995-02-19 23:32:59 +00:00
parent 9784295b15
commit 6fc5aecd53
3 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Mac/Modules/snd/Sndmodule.c
View File

@ -36,7 +36,7 @@ extern PyObject *WinObj_WhichWindow(WindowPtr);
#ifndef HAVE_UNIVERSAL_HEADERS #ifndef HAVE_UNIVERSAL_HEADERS
#define SndCallBackUPP ProcPtr #define SndCallBackUPP ProcPtr
#define NewSndCallBackProc(x) (x) #define NewSndCallBackProc(x) ((SndCallBackProcPtr)(x))
#define SndListHandle Handle #define SndListHandle Handle
#endif #endif

2
Mac/Modules/snd/sndsupport.py
View File

@ -21,7 +21,7 @@ includestuff = includestuff + """
#ifndef HAVE_UNIVERSAL_HEADERS #ifndef HAVE_UNIVERSAL_HEADERS
#define SndCallBackUPP ProcPtr #define SndCallBackUPP ProcPtr
#define NewSndCallBackProc(x) (x) #define NewSndCallBackProc(x) ((SndCallBackProcPtr)(x))
#define SndListHandle Handle #define SndListHandle Handle
#endif #endif
""" """

9
Mac/Python/macgetargv.c
View File

@ -41,6 +41,10 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include <AEObjects.h> #include <AEObjects.h>
#include <Desk.h> #include <Desk.h>
#include <Fonts.h> #include <Fonts.h>
#include <TextEdit.h>
#include <Menus.h>
#include <Dialogs.h>
#include <Windows.h>
#ifdef GENERATINGCFM /* Defined to 0 or 1 in Universal headers */ #ifdef GENERATINGCFM /* Defined to 0 or 1 in Universal headers */
#define HAVE_UNIVERSAL_HEADERS #define HAVE_UNIVERSAL_HEADERS
@ -147,7 +151,6 @@ get_application_name()
{ {
static char appname[256]; static char appname[256];
FSSpec appspec; FSSpec appspec;
long size;
if (current_process_location(&appspec)) if (current_process_location(&appspec))
return NULL; return NULL;
@ -282,6 +285,9 @@ event_loop()
static void static void
init_mac_world() init_mac_world()
{ {
#ifdef THINK_C
printf("\n");
#else
MaxApplZone(); MaxApplZone();
InitGraf(&qd.thePort); InitGraf(&qd.thePort);
InitFonts(); InitFonts();
@ -290,6 +296,7 @@ init_mac_world()
InitDialogs((long)0); InitDialogs((long)0);
InitMenus(); InitMenus();
InitCursor(); InitCursor();
#endif
} }
/* Get the argv vector, return argc */ /* Get the argv vector, return argc */