gcc/testsuite/gcc.dg/dump-ada-spec-1.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-fdump-ada-spec" } */
   3
   4 struct S
   5 {
   6   int i;
   7 };
   8
   9 /* { dg-final { scan-ada-spec "type S is record" } } */
  10 /* { dg-final { cleanup-ada-spec } } */