From 14cd750004af0fac7d39fae307eb8184c8f0dc24 Mon Sep 17 00:00:00 2001
From: Jack Jansen <jack.jansen@cwi.nl>
Date: Fri, 2 Jun 2000 21:23:09 +0000
Subject: Fixed callback function arguments to be carbon-compatible.
 (Temporarily?) removed call to ProcessHighLevelEvent until we find out how to
 do this (Carbon only).

---
 Mac/Python/macgetargv.c | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

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 @@ PyMac_GetFullPath (FSSpec *fss, char *buf)
 /* 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 @@ static int got_one; /* Flag that we can stop getting events */
 /* 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_not(AppleEvent *theAppleEvent, AppleEvent *reply, long refCon)
 /* 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_open_app(AppleEvent *theAppleEvent, AppleEvent *reply, long refCon)
 /* 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 @@ reset_ae_handlers()
 static void 
 event_loop()
 {
+#ifndef TARGET_API_MAC_CARBON
 	EventRecord event;
 	int n;
 	int ok;
@@ -293,6 +294,7 @@ event_loop()
 			AEProcessAppleEvent(&event);
 		}
 	}
+#endif
 }
 
 /* Get the argv vector, return argc */
-- 
cgit v0.12

