URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [mips/] [near-far-1.c] - Blame information for rev 321

Go to most recent revision | Details | Compare with Previous | View Log


/* { dg-do compile } */
/* { dg-options "-mlong-calls addressing=absolute" } */
 
extern int long_call_func () __attribute__((long_call));
extern int far_func () __attribute__((far));
extern int near_func () __attribute__((near));
extern int normal_func ();
 
int test ()
{
  return (long_call_func ()
          + far_func ()
          + near_func ()
          + normal_func ());
}
 
/* { dg-final { scan-assembler-not "\tjal\tlong_call_func\n" } } */
/* { dg-final { scan-assembler-not "\tjal\tfar_func\n" } } */
/* { dg-final { scan-assembler     "\tjal\tnear_func\n" } } */
/* { dg-final { scan-assembler-not "\tjal\tnormal_func\n" } } */

Line No.	Rev	Author	Line
1	321	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-options "-mlong-calls addressing=absolute" } */`
3
4			`extern int long_call_func () __attribute__((long_call));`
5			`extern int far_func () __attribute__((far));`
6			`extern int near_func () __attribute__((near));`
7			`extern int normal_func ();`
8
9			`int test ()`
10			`{`
11			`return (long_call_func ()`
12			`+ far_func ()`
13			`+ near_func ()`
14			`+ normal_func ());`
15			`}`
16
17			`/* { dg-final { scan-assembler-not "\tjal\tlong_call_func\n" } } */`
18			`/* { dg-final { scan-assembler-not "\tjal\tfar_func\n" } } */`
19			`/* { dg-final { scan-assembler "\tjal\tnear_func\n" } } */`
20			`/* { dg-final { scan-assembler-not "\tjal\tnormal_func\n" } } */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [mips/] [near-far-1.c] - Blame information for rev 321