231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
|
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
|
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
-
-
-
-
-
-
+
+
+
+
+
+
-
-
+
+
|
s[0] = [mutableStringClass stringWithString: @"täs€"];
s[1] = [mutableStringClass string];
s[2] = [[s[0] copy] autorelease];
TEST(@"-[isEqual:]", [s[0] isEqual: s[2]] &&
![s[0] isEqual: [[[OFObject alloc] init] autorelease]])
TEST(@"-[compare:]", [s[0] compare: s[2]] == OF_ORDERED_SAME &&
[s[0] compare: @""] != OF_ORDERED_SAME &&
[C(@"") compare: @"a"] == OF_ORDERED_ASCENDING &&
[C(@"a") compare: @"b"] == OF_ORDERED_ASCENDING &&
[C(@"cd") compare: @"bc"] == OF_ORDERED_DESCENDING &&
[C(@"ä") compare: @"ö"] == OF_ORDERED_ASCENDING &&
[C(@"€") compare: @"ß"] == OF_ORDERED_DESCENDING &&
[C(@"aa") compare: @"z"] == OF_ORDERED_ASCENDING)
TEST(@"-[compare:]", [s[0] compare: s[2]] == OFOrderedSame &&
[s[0] compare: @""] != OFOrderedSame &&
[C(@"") compare: @"a"] == OFOrderedAscending &&
[C(@"a") compare: @"b"] == OFOrderedAscending &&
[C(@"cd") compare: @"bc"] == OFOrderedDescending &&
[C(@"ä") compare: @"ö"] == OFOrderedAscending &&
[C(@"€") compare: @"ß"] == OFOrderedDescending &&
[C(@"aa") compare: @"z"] == OFOrderedAscending)
#ifdef OF_HAVE_UNICODE_TABLES
TEST(@"-[caseInsensitiveCompare:]",
[C(@"a") caseInsensitiveCompare: @"A"] == OF_ORDERED_SAME &&
[C(@"Ä") caseInsensitiveCompare: @"ä"] == OF_ORDERED_SAME &&
[C(@"я") caseInsensitiveCompare: @"Я"] == OF_ORDERED_SAME &&
[C(@"€") caseInsensitiveCompare: @"ß"] == OF_ORDERED_DESCENDING &&
[C(@"ß") caseInsensitiveCompare: @"→"] == OF_ORDERED_ASCENDING &&
[C(@"AA") caseInsensitiveCompare: @"z"] == OF_ORDERED_ASCENDING &&
[C(@"a") caseInsensitiveCompare: @"A"] == OFOrderedSame &&
[C(@"Ä") caseInsensitiveCompare: @"ä"] == OFOrderedSame &&
[C(@"я") caseInsensitiveCompare: @"Я"] == OFOrderedSame &&
[C(@"€") caseInsensitiveCompare: @"ß"] == OFOrderedDescending &&
[C(@"ß") caseInsensitiveCompare: @"→"] == OFOrderedAscending &&
[C(@"AA") caseInsensitiveCompare: @"z"] == OFOrderedAscending &&
[[stringClass stringWithUTF8String: "ABC"] caseInsensitiveCompare:
[stringClass stringWithUTF8String: "AbD"]] ==
[C(@"abc") compare: @"abd"])
#else
TEST(@"-[caseInsensitiveCompare:]",
[C(@"a") caseInsensitiveCompare: @"A"] == OF_ORDERED_SAME &&
[C(@"AA") caseInsensitiveCompare: @"z"] == OF_ORDERED_ASCENDING &&
[C(@"a") caseInsensitiveCompare: @"A"] == OFOrderedSame &&
[C(@"AA") caseInsensitiveCompare: @"z"] == OFOrderedAscending &&
[[stringClass stringWithUTF8String: "ABC"] caseInsensitiveCompare:
[stringClass stringWithUTF8String: "AbD"]] ==
[C(@"abc") compare: @"abd"])
#endif
TEST(@"-[hash] is the same if -[isEqual:] is true",
s[0].hash == s[2].hash)
|