File: pr71785.c

package info (click to toggle)
gcc-arm-none-eabi 15%3A12.2.rel1-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 959,712 kB
  • sloc: cpp: 3,275,382; ansic: 2,061,766; ada: 840,956; f90: 208,513; makefile: 76,132; asm: 73,433; xml: 50,448; exp: 34,146; sh: 32,436; objc: 15,637; fortran: 14,012; python: 11,991; pascal: 6,787; awk: 4,779; perl: 3,054; yacc: 338; ml: 285; lex: 201; haskell: 122
file content (57 lines) | stat: -rw-r--r-- 1,323 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
/* { dg-do compile { target { powerpc*-*-* } } } */
/* { dg-options "-O2" } */
/* We have to lose the default pic codegen on Darwin.  */
/* { dg-additional-options "-mdynamic-no-pic" { target powerpc*-*-darwin* } } */
/* ... and account for the out-of-line GPR restore.  */
/* { dg-final { scan-assembler-times {\mb[ \t]*restGPR} 1 { target powerpc*-*-darwin* } } } */
/* { dg-final { scan-assembler-not {\mb[ \t]L} { target powerpc*-*-darwin* } } } */
/* { dg-final { scan-assembler-not {\mb\M} { target { ! powerpc*-*-darwin* } } } } */

/* Check that all computed gotos in this testcase end up unfactored completely.
   If some is not there will be a unconditional jump left; if all works fine,
   all are gone.  */

typedef enum opcode
{
	OP_A,
	OP_B,
	OP_END
} opcode;

typedef struct op
{
	opcode opcode;
	int arg;
} op;

extern void do_stuff_b(int arg);
extern void do_stuff_c(int arg);

extern int someglobal;

void
eval(op *op)
{
	static const void *dispatch_table[] = {
		&&CASE_OP_A,
		&&CASE_OP_B,
		&&CASE_OP_C,
		&&CASE_OP_END
	};

	goto *dispatch_table[op->opcode];
CASE_OP_A:
	someglobal++;
	op++;
	goto *dispatch_table[op->opcode];
CASE_OP_B:
	do_stuff_b(op->arg);
	op++;
	goto *dispatch_table[op->opcode];
CASE_OP_C:
	do_stuff_c(op->arg);
	op++;
	goto *dispatch_table[op->opcode];
CASE_OP_END:
	return;
}