Fortran: Fix PR 47485.
[gcc.git] / gcc / testsuite / g++.dg / warn / warn_unused.C
blobaf687fc1671f2530274653cf82814cfbdd969417
1 // { dg-do compile }
2 // { dg-options -Wunused }
4 struct __attribute__((warn_unused)) Test
6     Test();
7     ~Test();
8     void use();
9 };
11 struct TestNormal
13     TestNormal();
16 int main()
18    Test unused;         // { dg-warning "unused variable" }
19    Test used;           // { dg-bogus "unused variable" }
20    TestNormal normal;   // { dg-bogus "unused variable" }
21    used.use();