diff options
Diffstat (limited to 'gcc-4.9/gcc/testsuite/objc/execute/class_self-2.m')
-rw-r--r-- | gcc-4.9/gcc/testsuite/objc/execute/class_self-2.m | 68 |
1 files changed, 68 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/objc/execute/class_self-2.m b/gcc-4.9/gcc/testsuite/objc/execute/class_self-2.m new file mode 100644 index 000000000..070c4c1a5 --- /dev/null +++ b/gcc-4.9/gcc/testsuite/objc/execute/class_self-2.m @@ -0,0 +1,68 @@ +/* Contributed by Nicola Pero - Fri Oct 26 22:39:32 BST 2001 */ +#include <stdlib.h> +#include <objc/objc.h> + +/* Test calling a class method on self where self has been redefined + to be another class - the call requires a cast */ + + +/* The first class */ +struct d +{ + int a; +}; + +@interface ClassA +{ + Class isa; +} ++ (Class) class; ++ (struct d) method; +@end + +@implementation ClassA ++ (Class) class +{ + return self; +} + ++ (struct d) method +{ + struct d u; + u.a = 5; + + return u; +} ++ initialize { return self; } +@end + +/* The second class */ +@interface TestClass +{ + Class isa; +} ++ (void) test; +@end + +@implementation TestClass ++ (void) test +{ + self = [ClassA class]; + + + if ([(Class)self method].a != 5) + { + abort (); + } +} + ++ initialize { return self; } +@end + + +int main (void) +{ + [TestClass test]; + + return 0; +} |