| Subject: | Compilation warnings on Tiger |
Noticed the following 2 warnings with gcc-4 on Tiger:
Mac-Carbon:5359: PerlAEUtils.cpp:347: warning: enumeral mismatch in
conditional expression: `
Mac-Carbon:5363: PerlAEUtils.cpp:357: warning: enumeral mismatch in
conditional expression: `
Attached patch fixes this.
Index: main/AppleEvents/PerlAEUtils.cp
--- AppleEvents/PerlAEUtils.cp.~1~ Fri May 20 20:50:07 2005
+++ AppleEvents/PerlAEUtils.cp Fri May 20 20:50:07 2005
@@ -343,8 +343,10 @@
if (ev)
ev->Get(handler, refCon);
-
- return ev != nil ? noErr : errAEEventNotHandled;
+ else
+ return errAEEventNotHandled;
+
+ return noErr;
}
OSErr PAERemoveEventHandler(OSType aeClass, OSType aeID, Boolean sysHandler)
@@ -353,8 +355,10 @@
if (ev)
delete ev;
-
- return ev != nil ? noErr : errAEHandlerNotFound;
+ else
+ return errAEEventNotHandled;
+
+ return noErr;
}
OSErr PAEDoAppleEvent(const AppleEvent * event, AppleEvent * reply)
End of Patch.