gcc/testsuite/objc.dg/two-types-1.m

   1 /* { dg-do compile } */
   2 /* { dg-options "-std=gnu89" } // suppress default -pedantic-errors */
   3
   4 @interface foo
   5 struct f {}
   6 struct g { int a; }; /* { dg-error "expected ';', identifier or " "" } */
   7
   8 - (struct f *) a;
   9 - (struct g *) b;
  10 @end
  11
  12 int f(struct g *x)
  13 {
  14   return x->a; /* { dg-bogus " has no member " "" } */
  15 }