2009-07-17 Richard Guenther <rguenther@suse.de>
[official-gcc.git] / gcc / testsuite / gcc.dg / cast-function-1.c
blob781d0e221911821144794c76f749c747ca46f703
1 /* PR c/12085 */
2 /* Origin: David Hollenberg <dhollen@mosis.org> */
4 /* Verify that the compiler doesn't inline a function at
5 a calling point where it is viewed with a different
6 prototype than the actual one. */
8 /* { dg-do compile } */
9 /* { dg-options "-O3" } */
11 int foo1(int);
12 int foo2();
14 typedef struct {
15 double d;
16 int a;
17 } str_t;
19 void bar(void)
21 double d;
22 int i;
23 str_t s;
25 d = ((double (*) (int)) foo1) (i); /* { dg-warning "33:non-compatible|abort" } */
26 i = ((int (*) (double)) foo1) (d); /* { dg-warning "33:non-compatible|abort" } */
27 s = ((str_t (*) (int)) foo1) (i); /* { dg-warning "32:non-compatible|abort" } */
28 ((void (*) (int)) foo1) (d); /* { dg-warning "non-compatible|abort" } */
29 i = ((int (*) (int)) foo1) (i); /* { dg-bogus "non-compatible|abort" } */
30 (void) foo1 (i); /* { dg-bogus "non-compatible|abort" } */
32 d = ((double (*) (int)) foo2) (i); /* { dg-warning "33:non-compatible|abort" } */
33 i = ((int (*) (double)) foo2) (d); /* { dg-bogus "non-compatible|abort" } */
34 s = ((str_t (*) (int)) foo2) (i); /* { dg-warning "non-compatible|abort" } */
35 ((void (*) (int)) foo2) (d); /* { dg-warning "non-compatible|abort" } */
36 i = ((int (*) (int)) foo2) (i); /* { dg-bogus "non-compatible|abort" } */
37 (void) foo2 (i); /* { dg-bogus "non-compatible|abort" } */
40 int foo1(int arg)
42 return arg;
45 int foo2(arg)
46 int arg;
48 return arg;