63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
@implementation TestsAppDelegate (RuntimeTests)
- (void)runtimeTests
{
void *pool = objc_autoreleasePoolPush();
RuntimeTest *rt = [[[RuntimeTest alloc] init] autorelease];
OFString *t, *foo;
EXPECT_EXCEPTION(@"Calling a non-existent method via super",
OFNotImplementedException, [rt superTest])
TEST(@"Calling a method via a super with self == nil",
[rt nilSuperTest] == nil)
t = [OFMutableString stringWithString: @"foo"];
foo = @"foo";
[rt setFoo: t];
TEST(@"copy, nonatomic properties", [rt.foo isEqual: foo] &&
rt.foo != foo && rt.foo.retainCount == 1)
rt.bar = t;
TEST(@"retain, atomic properties", rt.bar == t && t.retainCount == 3)
objc_autoreleasePoolPop(pool);
}
@end
|
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
@implementation TestsAppDelegate (RuntimeTests)
- (void)runtimeTests
{
void *pool = objc_autoreleasePoolPush();
RuntimeTest *rt = [[[RuntimeTest alloc] init] autorelease];
OFString *t, *foo;
#ifdef OF_OBJFW_RUNTIME
int cid1, cid2;
uintmax_t value;
id object;
#endif
EXPECT_EXCEPTION(@"Calling a non-existent method via super",
OFNotImplementedException, [rt superTest])
TEST(@"Calling a method via a super with self == nil",
[rt nilSuperTest] == nil)
t = [OFMutableString stringWithString: @"foo"];
foo = @"foo";
[rt setFoo: t];
TEST(@"copy, nonatomic properties", [rt.foo isEqual: foo] &&
rt.foo != foo && rt.foo.retainCount == 1)
rt.bar = t;
TEST(@"retain, atomic properties", rt.bar == t && t.retainCount == 3)
#ifdef OF_OBJFW_RUNTIME
if (sizeof(uintptr_t) == 8)
value = 0xDEADBEEFDEADBEF;
else if (sizeof(uintptr_t) == 4)
value = 0xDEADBEF;
else
abort();
TEST(@"Tagged pointers",
R(cid1 = objc_registerTaggedPointerClass([OFString class])) &&
R(cid2 = objc_registerTaggedPointerClass([OFNumber class])) &&
cid1 != -1 && cid2 != -1 &&
(object = objc_createTaggedPointer(cid2, (uintptr_t)value)) &&
object_getTaggedPointerClass(object) == [OFNumber class] &&
[object class] == [OFNumber class] &&
object_getTaggedPointerValue(object) == value &&
objc_createTaggedPointer(cid2, UINTPTR_MAX >> 4) != nil &&
objc_createTaggedPointer(cid2, (UINTPTR_MAX >> 4) + 1) == nil)
#endif
objc_autoreleasePoolPop(pool);
}
@end
|