gcc/testsuite/objc/execute/redefining_self.m

   1 /* Contributed by Nicola Pero - Fri Mar  9 19:39:15 CET 2001 */
   2 #include <objc/objc.h>
   3
   4 /* Test redefining self */
   5
   6 @interface TestClass
   7 {
   8   Class isa;
   9 }
  10 + (Class) class;
  11 @end
  12
  13 @implementation TestClass
  14 + (Class) class
  15 {
  16   self = Nil;
  17
  18   return self;
  19 }
  20 + initialize { return self; }
  21 @end
  22
  23
  24 int main (void)
  25 {
  26   if ([TestClass class] != Nil)
  27     {
  28       abort ();
  29     }
  30
  31   return 0;
  32 }