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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [frv/] [all-mclracca-1.c] - Blame information for rev 801

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


/* GCSE used to reuse the value of __MRDACC.  */
/* { dg-do run } */
extern void abort (void);
extern void exit (int);
 
void foo (int *z)
{
  __MWTACC (3, 1);
  if (__MRDACC (3) != 1)
    *z = 1;
  __MCLRACCA ();
  if (__MRDACC (3) != 1)
    *z = 2;
}
 
int main ()
{
  int z = 3;
 
  foo (&z);
  if (z != 2)
    abort ();
  exit (0);
}

Line No.	Rev	Author	Line
1	691	jeremybenn	`/* GCSE used to reuse the value of __MRDACC. */`
2			`/* { dg-do run } */`
3			`extern void abort (void);`
4			`extern void exit (int);`
5
6			`void foo (int *z)`
7			`{`
8			`__MWTACC (3, 1);`
9			`if (__MRDACC (3) != 1)`
10			`*z = 1;`
11			`__MCLRACCA ();`
12			`if (__MRDACC (3) != 1)`
13			`*z = 2;`
14			`}`
15
16			`int main ()`
17			`{`
18			`int z = 3;`
19
20			`foo (&z);`
21			`if (z != 2)`
22			`abort ();`
23			`exit (0);`
24			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [frv/] [all-mclracca-1.c] - Blame information for rev 801