OSDN Git Service

gcc
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / builtins-30.c
1 /* { dg-do compile } */
2 /* { dg-options "-Wall -Wshadow" } */
3
4 extern double strtod (const char *, char **);
5 #define UNUSED __attribute__ ((unused))
6
7 /* A built-in function may be overridden by an old-style definition
8    specifying too few arguments... */
9 double cos ()  /* { dg-warning "shadows a built-in" } */
10 {
11   /* { dg-warning "number of arguments doesn't match built-in prototype" "built-in" { target *-*-* } 10 } */
12   return strtod ("nan", 0);
13 }
14
15 /* the right number, but the wrong type, arguments... */
16 double sin (foo)  /* { dg-warning "shadows a built-in" } */
17      int foo UNUSED;
18 {  /* { dg-warning "argument 'foo' doesn't match built-in prototype" } */
19   return strtod ("nan", 0);
20 }
21
22 /* or too many arguments.  */
23 long double cosl (foo, bar)  /* { dg-warning "shadows a built-in" } */
24      const char *foo UNUSED;
25      int bar UNUSED;
26 {  /* { dg-warning "number of arguments doesn't match built-in prototype" } */
27   /* { dg-warning "argument 'foo' doesn't match built-in prototype" "foo" { target *-*-* } 26 } */
28   return strtod ("nan", 0);
29 }