39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
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
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
|
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
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
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
-
+
-
+
-
+
-
+
-
-
-
-
+
+
+
+
-
-
-
+
+
-
-
+
+
-
+
-
-
-
+
+
+
-
+
-
+
-
+
-
+
-
+
-
+
-
+
|
TEST(@"+[list]", (list = [OFList list]))
TEST(@"-[appendObject:]", [list appendObject: strings[0]] &&
[list appendObject: strings[1]] && [list appendObject: strings[2]])
TEST(@"-[firstListObject]",
[[list firstListObject]->object isEqual: strings[0]])
[list.firstListObject->object isEqual: strings[0]])
TEST(@"-[firstListObject]->next",
[[list firstListObject]->next->object isEqual: strings[1]])
[list.firstListObject->next->object isEqual: strings[1]])
TEST(@"-[lastListObject]",
[[list lastListObject]->object isEqual: strings[2]])
[list.lastListObject->object isEqual: strings[2]])
TEST(@"-[lastListObject]->previous",
[[list lastListObject]->previous->object isEqual: strings[1]])
[list.lastListObject->previous->object isEqual: strings[1]])
TEST(@"-[removeListObject:]",
R([list removeListObject: [list lastListObject]]) &&
[[list lastListObject]->object isEqual: strings[1]] &&
R([list removeListObject: [list firstListObject]]) &&
[[list firstListObject]->object isEqual:
R([list removeListObject: list.lastListObject]) &&
[list.lastListObject->object isEqual: strings[1]] &&
R([list removeListObject: list.firstListObject]) &&
[list.firstListObject->object isEqual: list.lastListObject->object])
[list lastListObject]->object])
TEST(@"-[insertObject:beforeListObject:]",
[list insertObject: strings[0]
beforeListObject: [list lastListObject]] &&
[[list lastListObject]->previous->object isEqual: strings[0]])
beforeListObject: list.lastListObject] &&
[list.lastListObject->previous->object isEqual: strings[0]])
TEST(@"-[insertObject:afterListObject:]",
[list insertObject: strings[2]
afterListObject: [list firstListObject]->next] &&
[[list lastListObject]->object isEqual: strings[2]])
afterListObject: list.firstListObject->next] &&
[list.lastListObject->object isEqual: strings[2]])
TEST(@"-[count]", [list count] == 3)
TEST(@"-[count]", list.count == 3)
TEST(@"-[containsObject:]",
[list containsObject: strings[1]] &&
![list containsObject: @"nonexistent"])
TEST(@"-[containsObjectIdenticalTo:]",
[list containsObjectIdenticalTo: strings[1]] &&
![list containsObjectIdenticalTo:
[OFString stringWithString: strings[1]]])
TEST(@"-[copy]", (list = [[list copy] autorelease]) &&
[[list firstListObject]->object isEqual: strings[0]] &&
[[list firstListObject]->next->object isEqual: strings[1]] &&
[[list lastListObject]->object isEqual: strings[2]])
[list.firstListObject->object isEqual: strings[0]] &&
[list.firstListObject->next->object isEqual: strings[1]] &&
[list.lastListObject->object isEqual: strings[2]])
TEST(@"-[isEqual:]", [list isEqual: [[list copy] autorelease]])
TEST(@"-[description]",
[[list description] isEqual: @"[\n\tFoo,\n\tBar,\n\tBaz\n]"])
[list.description isEqual: @"[\n\tFoo,\n\tBar,\n\tBaz\n]"])
TEST(@"-[objectEnumerator]", (enumerator = [list objectEnumerator]))
loe = [list firstListObject];
loe = list.firstListObject;
i = 0;
ok = true;
while ((obj = [enumerator nextObject]) != nil) {
if (![obj isEqual: loe->object])
ok = false;
loe = loe->next;
i++;
}
if ([list count] != i)
if (list.count != i)
ok = false;
TEST(@"OFEnumerator's -[nextObject]", ok);
[enumerator reset];
[list removeListObject: [list firstListObject]];
[list removeListObject: list.firstListObject];
EXPECT_EXCEPTION(@"Detection of mutation during enumeration",
OFEnumerationMutationException, [enumerator nextObject])
[list prependObject: strings[0]];
loe = [list firstListObject];
loe = list.firstListObject;
i = 0;
ok = true;
for (OFString *object in list) {
if (![object isEqual: loe->object])
ok = false;
loe = loe->next;
i++;
}
if ([list count] != i)
if (list.count != i)
ok = false;
TEST(@"Fast Enumeration", ok)
ok = false;
@try {
for (OFString *object in list) {
(void)object;
[list removeListObject: [list lastListObject]];
[list removeListObject: list.lastListObject];
}
} @catch (OFEnumerationMutationException *e) {
ok = true;
}
TEST(@"Detection of mutation during Fast Enumeration", ok)
[pool drain];
}
@end
|