1 2 3 4 5 6 7 8 9 10 11 12
/* { dg-do compile } */ /* { dg-options "-fdump-ada-spec" } */ typedef struct { int a; } Message_Type; extern int Func(const Message_Type *in, Message_Type *out); /* { dg-final { scan-ada-spec-not "System.Address" } } */ /* { dg-final { cleanup-ada-spec } } */