gnu/dist/gcc4/gcc/testsuite/objc/execute/class-3.m

   1 /* Contributed by Nicola Pero - Tue Mar  6 23:05:53 CET 2001 */
   2 #include <objc/objc.h>
   3 #include <objc/objc-api.h>
   4
   5 #include "next_mapping.h"
   6
   7 /* Tests creating a root class and a minimal subclass tree */
   8
   9 @interface RootClass
  10 {
  11   Class isa;
  12 }
  13 @end
  14
  15 @implementation RootClass
  16 @end
  17
  18 @interface SubClassA : RootClass
  19 @end
  20
  21 @implementation SubClassA
  22 @end
  23
  24 @interface SubClassB : RootClass
  25 @end
  26
  27 @implementation SubClassB
  28 @end
  29
  30 @interface SubSubClass : SubClassA
  31 @end
  32
  33 @implementation SubSubClass
  34 @end
  35
  36 #include "class-tests-1.h"
  37
  38 int main (void)
  39 {
  40   test_class_with_superclass ("SubClassA", "RootClass");
  41   test_class_with_superclass ("SubClassB", "RootClass");
  42   test_class_with_superclass ("SubSubClass", "SubClassA");
  43
  44   return 0;
  45 }