* testsuite/libgomp.fortran/vla7.f90: Add -w to options.
[official-gcc.git] / gcc / testsuite / gcc.dg / 20030612-1.c
blobf0875124385c0d0e1e70761dc5493608fa80ce3e
1 /* { dg-do run } */
2 /* { dg-options "-O2" } */
4 extern void abort (void);
6 int A, B;
8 void foo()
10 long x = 3;
11 (void)({
12 A = B + x + ((1) - 1);
13 return; /* { dg-warning "statement-expressions should end with a non-void expression" "" { xfail *-*-* } } */
14 });
17 main()
19 B = 5;
20 foo();
21 if (A != 8)
22 abort ();
23 return 0;