libs-base/Tests/base/NSAttributedString/test00.m
Richard Frith-MacDonald b452f37141 add a few more tests derived from mystep
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@36140 72102866-910b-0410-8b05-ffd578937521
2013-02-15 09:21:32 +00:00

52 lines
2 KiB
Objective-C

#import <Foundation/NSString.h>
#import <Foundation/NSAttributedString.h>
#import <Foundation/NSAutoreleasePool.h>
#import "ObjectTesting.h"
int main()
{
NSAutoreleasePool *arp = [NSAutoreleasePool new];
NSAttributedString *s;
NSString *key1, *val1, *str1;
NSRange r = NSMakeRange(0,6);
NSAttributedString *astr1, *astr2;
NSDictionary *dict1;
NSRange range = NSMakeRange(0,0);
id obj;
s = [[[NSAttributedString alloc] initWithString: @"string"] autorelease];
PASS_EQUAL([s string], @"string", "equality OK for string value");
PASS([s length] == 6, "length reported correctly");
PASS_EQUAL([s attributesAtIndex: 0 effectiveRange: NULL],
[NSDictionary dictionary], "returnsempty attributes dictionary, not nil");
key1 = @"Helvetica 12-point";
val1 = @"NSFontAttributeName";
str1 = @"Attributed string test";
dict1 = [NSDictionary dictionaryWithObject:val1 forKey:key1];
astr1 = [[NSAttributedString alloc] initWithString: str1 attributes: dict1];
PASS(astr1 != nil && [astr1 isKindOfClass: [NSAttributedString class]] &&
[[astr1 string] isEqual: str1],"-initWithString:attributes: works");
obj = [astr1 attributesAtIndex: 0 effectiveRange: &range];
PASS(obj != nil && [obj isKindOfClass: [NSDictionary class]] &&
[obj count] == 1 && range.length != 0,
"-attributesAtIndex:effectiveRange: works");
obj = [astr1 attribute: key1 atIndex: 0 effectiveRange: &range];
PASS(obj != nil && [obj isEqual: val1] && range.length != 0,
"-attribute:atIndex:effectiveRange: works");
obj = [astr1 attributedSubstringFromRange: r];
PASS(obj != nil && [obj isKindOfClass: [NSAttributedString class]] &&
[obj length] == r.length,"-attributedSubstringFromRange works");
r = NSMakeRange(0,[astr1 length]);
astr2 = [astr1 attributedSubstringFromRange: r];
PASS(astr2 != nil && [astr1 isEqualToAttributedString: astr2],
"extract and compare using -isEqualToAttributedString works");
[arp release]; arp = nil;
return 0;
}