Fixed callback function arguments to be carbon-compatible.
(Temporarily?) removed call to ProcessHighLevelEvent until we find out how to do this (Carbon only).
diff --git a/Mac/Python/macgetargv.c b/Mac/Python/macgetargv.c
index a0efa17..37522c8 100644
--- a/Mac/Python/macgetargv.c
+++ b/Mac/Python/macgetargv.c
@@ -167,7 +167,7 @@
/* Check that there aren't any args remaining in the event */
static OSErr
-get_missing_params(AppleEvent *theAppleEvent)
+get_missing_params(const AppleEvent *theAppleEvent)
{
DescType theType;
Size actualSize;
@@ -186,7 +186,7 @@
/* Handle the Print or Quit events (by failing) */
static pascal OSErr
-handle_not(AppleEvent *theAppleEvent, AppleEvent *reply, long refCon)
+handle_not(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long refCon)
{
#pragma unused (reply, refCon)
got_one = 1;
@@ -196,7 +196,7 @@
/* Handle the Open Application event (by ignoring it) */
static pascal OSErr
-handle_open_app(AppleEvent *theAppleEvent, AppleEvent *reply, long refCon)
+handle_open_app(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long refCon)
{
#pragma unused (reply, refCon)
#if 0
@@ -209,7 +209,7 @@
/* Handle the Open Document event, by adding an argument */
static pascal OSErr
-handle_open_doc(AppleEvent *theAppleEvent, AppleEvent *reply, long refCon)
+handle_open_doc(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long refCon)
{
#pragma unused (reply, refCon)
OSErr err;
@@ -281,6 +281,7 @@
static void
event_loop()
{
+#ifndef TARGET_API_MAC_CARBON
EventRecord event;
int n;
int ok;
@@ -293,6 +294,7 @@
AEProcessAppleEvent(&event);
}
}
+#endif
}
/* Get the argv vector, return argc */