Author: jam...@us...
Date: Tue Dec 9 13:10:33 2008
New Revision: 370
Modified:
branches/objc2/hoc/HOC_cbits/Exceptions.m
Log:
(objc2 branch) fixed a backward-compatibility issue I previously noted but
forgot to fix
Modified: branches/objc2/hoc/HOC_cbits/Exceptions.m
==============================================================================
--- branches/objc2/hoc/HOC_cbits/Exceptions.m (original)
+++ branches/objc2/hoc/HOC_cbits/Exceptions.m Tue Dec 9 13:10:33 2008
@@ -64,8 +64,11 @@
clsHOCHaskellException = getClassByName("HOCHaskellException");
stablePtrIvar = class_getInstanceVariable(clsHOCHaskellException,
hsExceptionIvarName);
- #warning TODO - ivar_getOffset needs backport or workaround for
fact that offsets are no longer in the list
+#ifdef __OBJC2__
stablePtrOffset = ivar_getOffset(stablePtrIvar);
+#else
+ stablePtrOffset = stablePtrIvar->ivar_offset;
+#endif
selExceptionWithNameReasonUserInfo =
getSelectorForName("exceptionWithName:reason:userInfo:");
|
