/* Test class methods inside categories. */ /* Author: Ziemowit Laski . */ /* { dg-options "-lobjc" } */ /* { dg-do run } */ #include #ifdef __NEXT_RUNTIME__ #define SUPERCLASS superclass #else #define SUPERCLASS superClass #endif extern int strcmp(const char *s1, const char *s2); extern void abort(void); #define CHECK_IF(expr) if(!(expr)) abort() @interface MyObject: Object + (Class)whatever1; @end @implementation MyObject + (Class)whatever1 { return [super SUPERCLASS]; } @end @interface MyObject (ThisWontCompile) +(Class)whatever2; @end @implementation MyObject (ThisWontCompile) +(Class)whatever2 { return [super SUPERCLASS]; } @end int main (int argc, const char * argv[]) { Class w1 = [MyObject whatever1]; Class w2 = [MyObject whatever2]; CHECK_IF(!strcmp(w1->name, "Object")); CHECK_IF(!strcmp(w2->name, "Object")); return 0; }