URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [objc.dg/] [category-1.m] - Rev 867
Go to most recent revision | Compare with Previous | Blame | View Log
/* Test class methods inside categories. */ /* Author: Ziemowit Laski <zlaski@apple.com>. */ /* { dg-options "-lobjc" } */ /* { dg-do run } */ #include <objc/Object.h> #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; }
Go to most recent revision | Compare with Previous | Blame | View Log