FSF GCC merge 02/23/03
[official-gcc.git] / gcc / testsuite / gcc.c-torture / execute / 960117-1.c
blob741455b08b90fab8a58d31203176a902eb34ed37
1 static char id_space[2] [32 +1];
2 typedef short COUNT;
4 typedef char TEXT;
6 union T_VALS
8 TEXT *id __attribute__ ((aligned (2), packed)) ;
9 };
10 typedef union T_VALS VALS;
12 struct T_VAL
14 COUNT pos __attribute__ ((aligned (2), packed)) ;
15 VALS vals __attribute__ ((aligned (2), packed)) ;
17 typedef struct T_VAL VAL;
19 VAL curval = {0};
21 static short idc = 0;
22 static int cur_line;
23 static int char_pos;
25 typedef unsigned short WORD;
27 WORD
28 get_id (char c)
30 curval.vals.id[0] = c;
33 WORD
34 get_tok ()
36 char c = 'c';
37 curval.vals.id = id_space[idc];
38 curval.pos = (cur_line << 10) | char_pos;
39 return get_id (c);
42 main ()
44 get_tok ();
45 exit (0);