| /* APPLE LOCAL file 4149909 */ |
| /* Test if ObjC constant string layout is checked properly, regardless of how |
| constant string classes get derived. */ |
| /* Contributed by Ziemowit Laski <zlaski@apple.com> */ |
| |
| /* { dg-options "-fnext-runtime -fno-constant-cfstrings -fconstant-string-class=XStr" } */ |
| /* { dg-do compile { target *-*-darwin* } } */ |
| /* { dg-skip-if "" { *-*-darwin* } { "-m64" } { "" } } */ |
| |
| #include <objc/Object.h> |
| |
| @interface XString: Object { |
| @protected |
| char *bytes; |
| } |
| @end |
| |
| @interface XStr : XString { |
| @public |
| unsigned int len; |
| } |
| @end |
| |
| /* APPLE LOCAL begin objc2 */ |
| #if OBJC_API_VERSION >= 2 |
| extern Class _XStrClassReference; |
| #else |
| extern struct objc_class _XStrClassReference; |
| #endif |
| /* APPLE LOCAL end objc2 */ |
| |
| const XStr *appKey = @"MyApp"; |
| |
| /* { dg-final { scan-assembler ".section __OBJC, __cstring_object" } } */ |
| /* { dg-final { scan-assembler ".long\t__XStrClassReference\n\t.long\t.*\n\t.long\t5\n\t.data" } } */ |
