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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [20030324-1.c] - Rev 801

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

/* { dg-do run } */
/* { dg-options "-O -fstrict-aliasing -fgcse" } */
 
/* PR optimization/10087 */
/* Contributed by Peter van Hoof <p.van-hoof@qub.ac.uk> */
 
extern void abort(void);
 
void b(int*,int*);
 
typedef struct {
    double T1;
    char c;
} S;
 
int main(void)
{
  int i,j;
  double s;
 
  S x1[2][2];
  S *x[2] = { x1[0], x1[1] };
  S **E = x;
 
  for( i=0; i < 2; i++ )
    for( j=0; j < 2; j++ )
      E[j][i].T1 = 1;
 
  for( i=0; i < 2; i++ )
    for( j=0; j < 2; j++ )
      s = E[j][i].T1;
 
  b(&j,&i);
  if (s != 1)
    abort ();
  return 0;
}
 
void b(int *i, int *j) {}
 

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.