gcc/testsuite/objc/execute/accessing_ivars.m

   1 /* Contributed by Nicola Pero - Thu Mar  8 16:27:46 CET 2001 */
   2 #include <stdlib.h>
   3 #ifndef __NEXT_RUNTIME__
   4 #include <objc/objc-api.h>
   5 #endif
   6 #include "../../objc-obj-c++-shared/Object1.h"
   7
   8 /* Test that by using -> we can access ivars of other objects of the same
   9    class */
  10
  11 @interface TestClass : Object
  12 {
  13   int value;
  14 }
  15 - (int) value;
  16 - (int) setValue: (int)number;
  17 - (void) takeValueFrom: (TestClass *)object;
  18 @end
  19
  20 @implementation TestClass : Object
  21 {
  22   int value;
  23 }
  24 - (int) value
  25 {
  26   return value;
  27 }
  28 - (int) setValue: (int)number
  29 {
  30   value = number;
  31 }
  32 - (void) takeValueFrom: (TestClass *)object
  33 {
  34   value = object->value;
  35 }
  36 @end
  37
  38 int main (void)
  39 {
  40   TestClass *a;
  41   TestClass *b;
  42
  43   a = [TestClass new];
  44   [a setValue: 10];
  45
  46   b = [TestClass new];
  47   [b setValue: -10];
  48
  49   [b takeValueFrom: a];
  50
  51   if ([b value] != [a value])
  52     {
  53       abort ();
  54     }
  55
  56   return 0;
  57 }
  58 #include "../../objc-obj-c++-shared/Object1-implementation.h"