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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [i386/] [pr12329.c] - Rev 691

Compare with Previous | Blame | View Log

/* { dg-do run } */
/* { dg-require-effective-target ia32 } */
/* { dg-options "-O2" } */
 
extern void abort (void);
 
int test_nested1 (int i)
{
  int __attribute__ ((__noinline__, __regparm__(3))) foo(int j, int k, int l)
  {
    return i + j + k + l;
  }
 
  return foo (i, i+1, i+2);
}
 
int test_nested2 (int i)
{
  int x;
 
  int __attribute__ ((__noinline__, __regparm__(3))) foo(int j, int k, int l)
  {
    return i + j + k + l;
  }
 
  x = foo (i+3, i+1, i+2);
  if (x != (4*i + 6))
    abort ();
 
  return x;
}
 
int
main ()
{
  int i = test_nested1 (3);
 
  if (i != 15)
    abort ();
 
  i = test_nested2 (4);
 
  if (i != 22)
    abort ();
 
  return 0;
}
 

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.