Subversion Repositories openrisc

// PR target/6043
// This testcase ICEd on IA-64 because emit_group_store
// did not handle loading CONCAT from register group
// { dg-do compile }

struct C
{
  C (double y, double z) { __real__ x = y; __imag__ x = z; }
  double r () const { return __real__ x; }
  double i () const { return __imag__ x; }
  __complex__ double x;
};

inline C conj (const C& x)
{
  return C (x.r (), - x.i ());
}

void foo (void)
{
  C x (1.0, 1.0);
  conj (x);
}