gcc/testsuite/obj-c++.dg/property/at-property-6.mm

   1 /* Contributed by Nicola Pero <nicola.pero@meta-innovation.com>, October 2010.  */
   2 /* { dg-do run } */
   3 /* { dg-xfail-run-if "Needs OBJC2 ABI" { *-*-darwin* && { lp64 && { ! objc2 } } } { "-fnext-runtime" } { "" } } */
   4
   5 /* Test the property syntax with non-synthesized setter/getter
   6    and with standard names.  */
   7
   8 #include <stdlib.h>
   9 #include <objc/objc.h>
  10 #include <objc/runtime.h>
  11
  12 @interface MyRootClass
  13 {
  14   Class isa;
  15   int a;
  16 }
  17 @property (nonatomic) int a;
  18 + (id) initialize;
  19 + (id) alloc;
  20 - (id) init;
  21 @end
  22
  23 @implementation MyRootClass
  24 + (id) initialize { return self; }
  25 + (id) alloc { return class_createInstance (self, 0); }
  26 - (id) init { return self; }
  27
  28 - (int) a
  29 {
  30   return a;
  31 }
  32 - (void) setA: (int)value
  33 {
  34   a = value;
  35 }
  36 @end
  37
  38 int main (void)
  39 {
  40   MyRootClass *object = [[MyRootClass alloc] init];
  41
  42   if (object.a != 0)
  43     abort ();
  44
  45   object.a = 14;
  46
  47   if (object.a != 14)
  48     abort ();
  49
  50   object.a = 23;
  51
  52   if (object.a != 23)
  53     abort ();
  54
  55   object.a = 78;
  56
  57   if (object.a != 78)
  58     abort ();
  59
  60   return (0);
  61 }