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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [pr33992.c] - Rev 711

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

extern void abort ();
 
void __attribute__((noinline))
bar (unsigned long long i)
{
  if (i)
    abort ();
}
 
void __attribute__((always_inline))
foo (unsigned long long *r)
{
  int i;
 
  for (i = 0; ; i++)
    if (*r & ((unsigned long long)1 << (63 - i)))
      break;
 
  bar (i);
}
 
void __attribute__((noinline))
do_test (unsigned long long *r)
{
  int i;
 
  for (i = 0; i < 2; ++i)
    foo (r);
}
 
int main()
{
  unsigned long long r = 0x8000000000000001ull;
 
  do_test (&r);
  return 0;
}
 

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.