libs-base/Tests/base/NSDate/general.m
rfm b179b29898 import testsuite
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/base/trunk@32187 72102866-910b-0410-8b05-ffd578937521
2011-02-16 08:21:17 +00:00

33 lines
863 B
Objective-C

#import "Testing.h"
#import <Foundation/NSAutoreleasePool.h>
#import <Foundation/NSDate.h>
int main()
{
NSAutoreleasePool *arp = [NSAutoreleasePool new];
NSDate *cdate, *date1, *date2;
NSComparisonResult comp;
cdate = [NSDate date];
comp = [cdate compare: [NSDate distantFuture]];
PASS(comp == NSOrderedAscending, "+distantFuture is in the future");
comp = [cdate compare: [NSDate distantPast]];
PASS(comp == NSOrderedDescending, "+distantPast is in the past");
date1 = [NSDate dateWithTimeIntervalSinceNow:-600];
date2 = [cdate earlierDate: date1];
PASS(date1 == date2, "-earlierDate works");
date2 = [cdate laterDate: date1];
PASS(cdate == date2, "-laterDate works");
date2 = [date1 addTimeInterval:0];
PASS ([date1 isEqualToDate:date2], "-isEqualToDate works");
[arp release]; arp = nil;
return 0;
}