gcc/testsuite/gcc.c-torture/execute/20020411-1.c

   1 /* PR optimization/6177
   2    This testcase ICEd because expr.c did not expect to see a CONCAT
   3    as array rtl.  */
   4
   5 extern void abort (void);
   6 extern void exit (int);
   7
   8 __complex__ float foo (void)
   9 {
  10   __complex__ float f[1];
  11   __real__ f[0] = 1.0;
  12   __imag__ f[0] = 1.0;
  13   f[0] = __builtin_conjf (f[0]);
  14   return f[0];
  15 }
  16
  17 int main (void)
  18 {
  19   __complex__ double d[1];
  20   d[0] = foo ();
  21   if (__real__ d[0] != 1.0
  22       || __imag__ d[0] != -1.0)
  23     abort ();
  24   exit (0);
  25 }