Subversion Repositories openrisc

/* { dg-do compile } */

/* { dg-options "-O1" } */

/* Let gimple verifier check what SRA does to unions and single-field

   strucutres . */

struct sim_struct

{

  int x;

};

extern struct sim_struct get_x(void);

struct sim_struct foo (void)

{

  struct sim_struct simple;

  simple = get_x ();

  if (simple.x % 2)

    simple.x = 39;

  else

    simple.x -=8;

  return simple;

}

struct sim_cmplx

{

  _Complex double c;

};

extern struct sim_cmplx get_sc (void);

_Complex double foo_c (void)

{

  struct sim_cmplx simple;

  simple = get_sc ();

  if (__real__ simple.c > 200.3)

    __imag__ simple.c -= 2.4;

  return simple.c;

}

union sim_union

{

  int i;

  float d;

};

extern union sim_union get_y (void);

union sim_union bar (void)

{

  union sim_union simple;

  simple = get_y ();

  if (simple.d > 8.2)

    simple.i = 300;

  return simple;

}

extern int get_int (void);

int bar_i (void)

{

  union sim_union simple;

  simple = get_y ();

  if (simple.d > 8.2)

    simple.i = get_int ();

  return simple.i;

}