gcc/testsuite/obj-c++.dg/encode-6.mm

   1 /* Encoding tests for ObjC class layouts.  */
   2 /* Contributed by Ziemowit Laski <zlaski@apple.com>.  */
   3 /* { dg-options "" } */
   4 /* { dg-do run } */
   5 /* { dg-xfail-run-if "Needs OBJC2 ABI" { *-*-darwin* && { lp64 && { ! objc2 } } } { "-fnext-runtime" } { "" } } */
   6 #include "../objc-obj-c++-shared/Object1.h"
   7 #include "../objc-obj-c++-shared/next-mapping.h"
   8 #ifndef __NEXT_RUNTIME__
   9 #include <objc/objc-api.h>
  10 #endif
  11
  12 #include <stdlib.h>
  13 #include <string.h>
  14
  15 #define CHECK_IF(expr) if(!(expr)) abort()
  16
  17 @class Int1, Int2;
  18 struct Nested;
  19
  20 struct Innermost {
  21   unsigned char a, b;
  22   struct Nested *encl;
  23 };
  24
  25 struct Nested {
  26   float a, b;
  27   Int1 *next;
  28   struct Innermost innermost;
  29 };
  30
  31 @interface Int1: Object {
  32   signed char a, b;
  33   Int2 *int2;
  34   struct Nested nested;
  35 }
  36 @end
  37
  38 @interface Int2: Int1 {
  39   struct Innermost *innermost;
  40   Int1 *base;
  41 }
  42 @end
  43
  44 @implementation Int1
  45 @end
  46
  47 @implementation Int2
  48 @end
  49
  50 #ifdef NEXT_OBJC_USE_NEW_INTERFACE
  51 Ivar *ivar;
  52 #else
  53 struct objc_ivar *ivar;
  54 #endif
  55
  56 static void check_ivar(const char *name, const char *type) {
  57 #ifdef NEXT_OBJC_USE_NEW_INTERFACE
  58   CHECK_IF(!strcmp(ivar_getName(*ivar), name));
  59   CHECK_IF(!strcmp(ivar_getTypeEncoding(*ivar), type));
  60 #else
  61   CHECK_IF(!strcmp(ivar->ivar_name, name));
  62   CHECK_IF(!strcmp(ivar->ivar_type, type));
  63 #endif
  64   ivar++;
  65 }
  66
  67 int main(void) {
  68 #ifdef NEXT_OBJC_USE_NEW_INTERFACE
  69   ivar = class_copyIvarList ((Class)objc_get_class("Int1"), NULL);
  70 #else
  71   ivar = ((Class)objc_get_class("Int1"))->ivars->ivar_list;
  72 #endif
  73   check_ivar("a", "c");
  74   check_ivar("b", "c");
  75   check_ivar("int2", "@\"Int2\"");
  76   check_ivar("nested",
  77     "{Nested=\"a\"f\"b\"f\"next\"@\"Int1\"\"innermost\"{Innermost=\"a\"C\"b\"C\"encl\"^{Nested}}}");
  78
  79 #ifdef NEXT_OBJC_USE_NEW_INTERFACE
  80   ivar = class_copyIvarList ((Class)objc_get_class("Int2"), NULL);
  81 #else
  82   ivar = ((Class)objc_get_class("Int2"))->ivars->ivar_list;
  83 #endif
  84   check_ivar("innermost", "^{Innermost=CC^{Nested}}");
  85   check_ivar("base", "@\"Int1\"");
  86
  87   return 0;
  88 }
  89 #include "../objc-obj-c++-shared/Object1-implementation.h"