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 */