OSDN Git Service

026162c2e700296c4c18a029bf37a9016d497083
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.c-torture / compile / pr33009.c
1 /* { dg-do compile } */
2 /* Currently ICEs for MIPS, CRIS and PowerPC; see PR33642.  */
3 /* { dg-xfail-if "PR33642" { mips*-*-* powerpc*-*-linux* cris-*-* crisv32-*-* } { "*" } { "" } } */
4 /* Currently ICEs for (x86 && ilp32 && pic).  */
5 /* { dg-xfail-if "PR33642/36240" { { i?86-*-* x86_64-*-* } && { ilp32 && { ! nonpic } } } { "*" } { "" } } */
6 /* { dg-prune-output ".*internal compiler error.*" }
7 /* { dg-options "-frtl-abstract-sequences" } */
8
9 char *progName;
10 int bar0 (char *, ...);
11 void bar1 (char *);
12 void exit (int);
13
14
15 #define SAME \
16  bar0 ("%s: Bad flag `%s'\n", argv[i], argv[i] );\
17  bar1 ( progName ); \
18  exit ( 1 );
19
20
21 int foo ( int argc, char *argv[] )
22 {
23     int i;
24     for (i = 0; i < argc; i++) {
25         switch (argv[i][0]) {
26         case 'c':
27             break;
28         default: 
29         
30             SAME
31             
32             break;
33         }
34     }
35     for (i = 0; i < argc; i++) {
36     
37         SAME
38         
39     }
40     return 0;
41 }