gcc/testsuite/gcc.target/mips/near-far-2.c

   1 /* { dg-do compile } */
   2 /* { dg-mips-options "-mno-long-calls" } */
   3 /* { dg-require-effective-target nonpic } */
   4
   5 extern int long_call_func () __attribute__((long_call));
   6 extern int far_func () __attribute__((far));
   7 extern int near_func () __attribute__((near));
   8 extern int normal_func ();
   9
  10 int test ()
  11 {
  12   return (long_call_func ()
  13           + far_func ()
  14           + near_func ()
  15           + normal_func ());
  16 }
  17
  18 /* { dg-final { scan-assembler-not "\tjal\tlong_call_func\n" } } */
  19 /* { dg-final { scan-assembler-not "\tjal\tfar_func\n" } } */
  20 /* { dg-final { scan-assembler     "\tjal\tnear_func\n" } } */
  21 /* { dg-final { scan-assembler     "\tjal\tnormal_func\n" } } */