OSDN Git Service

PR fortran/29459
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / g++.dg / other / cv_func.C
1 // { dg-do compile }
2 // { dg-options "-pedantic -pedantic-errors" }
3 typedef int FIC(int) const;
4 typedef int FI(int);
5
6 FIC f; // { dg-error "qualified" }
7 // { dg-error "ignoring" "ignoring" { target *-*-* } 6 }
8 struct S {
9   FIC f; // OK
10
11   const FI g; // { dg-error "qualifier" }
12
13   int h(int) const;
14
15 };
16 FIC S::*pm = &S::f;
17 const FI S::*pm2 = &S::f; // { dg-error "qualifier" }
18 // { dg-error "cannot convert" "cannot convert" { target *-*-* } 17 }
19 const FIC S::*pm3 = &S::f; // { dg-error "qualifier" }
20
21 int S::f(int) const
22 {
23   return 17;
24 }
25
26
27 int foo(float) const // { dg-error "qualifier" }
28 {
29   return 0;
30 }
31
32 int bar(float) volatile; // { dg-error "qualifier" }