Subversion Repositories openrisc

/* Testcase to check generation of a SH2A specific,

   TBR relative jump instruction - 'JSR @@(disp8,TBR)'.  */

/* { dg-do assemble {target sh*-*-*}} */

/* { dg-options "" } */

/* { dg-skip-if "" { "sh*-*-*" } "*" "-m2a -m2a-nofpu -m2a-single -m2a-single-only" } */

/* { dg-final { scan-assembler-times "jsr/n\\t@@\\(40,tbr\\)" 1} } */

/* { dg-final { scan-assembler-times "jsr/n\\t@@\\(72,tbr\\)" 1} } */

extern void foo1 (void) __attribute__ ((function_vector(10)));

extern void foo2 (void);

extern int bar1 (void) __attribute__ ((function_vector(18)));

extern int bar2 (void);

int

bar()

{

  foo1();

  foo2();

  bar1();

  bar2();

}