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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [990208-1.c] - Rev 774

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

/* As a quality of implementation issue, we should not prevent inlining
   of function explicitly marked inline just because a label therein had
   its address taken.  */
 
#ifndef NO_LABEL_VALUES
static void *ptr1, *ptr2;
static int i = 1;
 
static __inline__ void doit(void **pptr, int cond)
{
  if (cond) {
  here:
    *pptr = &&here;
  }
}
 
__attribute__ ((noinline))
static void f(int cond)
{
  doit (&ptr1, cond);
}
 
__attribute__ ((noinline))
static void g(int cond)
{
  doit (&ptr2, cond);
}
 
__attribute__ ((noinline))
static void bar(void);
 
int main()
{
  f (i);
  bar();
  g (i);
 
#ifdef  __OPTIMIZE__
  if (ptr1 == ptr2)
    abort ();
#endif
 
  exit (0);
}
 
void bar(void) { }
 
#else /* NO_LABEL_VALUES */
int main() { exit(0); }
#endif
 

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

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.