Subversion Repositories openrisc

/* { dg-do compile } */
/* { dg-options "-O2 -fdump-tree-einline2" } */
/* { dg-add-options bind_pic_locally } */
 
extern int rand(void);
 
int get_data_for (int id)
{
  return rand();
}
 
int my_id;
 
int main()
{
  int res = get_data_for (my_id);
  switch (res)
    {
      case 0:
	  return 666;
      default:
	  return -1;
    }
}
 
/* { dg-final { scan-tree-dump "Inlining get_data_for into main" "einline2" } } */
/* { dg-final { cleanup-tree-dump "einline2" } } */