File: basic.m

package info (click to toggle)
gnustep-base 1.31.1-4
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 26,580 kB
  • sloc: objc: 239,446; ansic: 36,519; cpp: 122; sh: 112; makefile: 100; xml: 32
file content (18 lines) | stat: -rw-r--r-- 531 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#import "ObjectTesting.h"
#import <Foundation/NSAutoreleasePool.h>
#import <Foundation/NSUserDefaults.h>

int main()
{
  NSAutoreleasePool	*arp = [NSAutoreleasePool new];
  NSUserDefaults	*defs = AUTORELEASE([NSUserDefaults new]);

  test_NSObject(@"NSUserDefaults", [NSArray arrayWithObject: defs]); 

  defs = [NSUserDefaults standardUserDefaults];
  [defs setDouble: (double)42.42 forKey: @"aDouble"];
  PASS(EQ((double)42.42, [defs doubleForKey: @"aDouble"]),
    "can store double");
  [arp release]; arp = nil;
  return 0;
}