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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [20030826-2.c] - Rev 750

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

/* { dg-do run } */
/* { dg-options "-O2 -fomit-frame-pointer" } */
/* { dg-options "-O2 -fomit-frame-pointer -march=i386" { target { { i?86-*-* x86_64-*-* } && ia32 } } } */
 
extern void abort (void);
extern void exit (int);
 
struct S
{
  int *a;
  unsigned char *b, c;
};
 
int u, v, w;
 
void
foo (unsigned short x)
{
  u += x;
}
 
int
bar (struct S **x, int *y)
{
  w += *y;
  *y = w + 25;
  return 0;
}
 
int
baz (struct S **x)
{
  struct S *y = *x;
  unsigned char *a = y->b;
 
  foo (*a);
 
  if (__builtin_expect (y->c != 0 || y->a == &v, 0))
    return 1;
 
  if (__builtin_expect (*a == 1, 0))
    {
      int a, b = bar (x, &a);
 
      if (a)
	return b;
    }
 
  return 0;
}
 
int
main (void)
{
  struct S a, *b = &a;
  unsigned char c;
 
  __builtin_memset (b, 0, sizeof (a));
  a.a = &v;
  a.b = &c;
  if (baz (&b) != 1)
    abort ();
  exit (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.