OSDN Git Service

gcc/
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.target / sh / sh2a-tbr-jump.c
1 /* Testcase to check generation of a SH2A specific,
2    TBR relative jump instruction - 'JSR @@(disp8,TBR)'.  */
3 /* { dg-do assemble {target sh*-*-*}} */
4 /* { dg-options "" } */
5 /* { dg-skip-if "" { "sh*-*-*" } "*" "-m2a -m2a-nofpu -m2a-single -m2a-single-only" } */
6 /* { dg-final { scan-assembler-times "jsr/n\\t@@\\(40,tbr\\)" 1} } */
7 /* { dg-final { scan-assembler-times "jsr/n\\t@@\\(72,tbr\\)" 1} } */
8  
9 extern void foo1 (void) __attribute__ ((function_vector(10)));
10 extern void foo2 (void);
11 extern int bar1 (void) __attribute__ ((function_vector(18)));
12 extern int bar2 (void);
13
14 int
15 bar()
16 {
17   foo1();
18   foo2();
19
20   bar1();
21   bar2();
22 }