Adapted for Universal Headers 3.4: refcon type has changed (sigh) and use modern...

diff --git a/Mac/Python/macgetargv.c b/Mac/Python/macgetargv.c
index ac4e2868f8245f5c2cbe1ccf827872ae8454b688..1bd57ad5606813bcf324819177b41968d6e2be8f 100644 (file)
--- a/Mac/Python/macgetargv.c
+++ b/Mac/Python/macgetargv.c
@@ -41,6 +41,12 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 #include <Dialogs.h>
 #include <Windows.h>
 
+#if UNIVERSAL_INTERFACES_VERSION >= 0x0340
+typedef long refcontype;
+#else
+typedef unsigned long refcontype;
+#endif
+
 #include "Python.h"
 #include "macglue.h"
 
@@ -109,7 +115,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(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long refCon)
+handle_not(const AppleEvent *theAppleEvent, AppleEvent *reply, refcontype refCon)
 {
        #pragma unused (reply, refCon)
        got_one = 1;
@@ -119,7 +125,7 @@ handle_not(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long ref
 /* Handle the Open Application event (by ignoring it) */
 
 static pascal OSErr
-handle_open_app(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long refCon)
+handle_open_app(const AppleEvent *theAppleEvent, AppleEvent *reply, refcontype refCon)
 {
        #pragma unused (reply, refCon)
 #if 0
@@ -132,7 +138,7 @@ handle_open_app(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned lon
 /* Handle the Open Document event, by adding an argument */
 
 static pascal OSErr
-handle_open_doc(const AppleEvent *theAppleEvent, AppleEvent *reply, unsigned long refCon)
+handle_open_doc(const AppleEvent *theAppleEvent, AppleEvent *reply, refcontype refCon)
 {
        #pragma unused (reply, refCon)
        OSErr err;
@@ -170,9 +176,9 @@ AEEventHandlerUPP not_upp;
 static void
 set_ae_handlers()
 {
-       open_doc_upp = NewAEEventHandlerProc(handle_open_doc);
-       open_app_upp = NewAEEventHandlerProc(handle_open_app);
-       not_upp = NewAEEventHandlerProc(handle_not);
+       open_doc_upp = NewAEEventHandlerUPP(&handle_open_doc);
+       open_app_upp = NewAEEventHandlerUPP(&handle_open_app);
+       not_upp = NewAEEventHandlerUPP(&handle_not);
        
        AEInstallEventHandler(kCoreEventClass, kAEOpenApplication,
                              open_app_upp, 0L, false);