(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.c-torture/
execute/
20070614-1.c
       1  extern void abort (void);
       2  
       3  _Complex v = 3.0 + 1.0iF;
       4  
       5  void
       6  foo (_Complex z, int *x)
       7  {
       8    if (z != v)
       9      abort ();
      10  }
      11  
      12  _Complex bar (_Complex z) __attribute__ ((pure));
      13  _Complex
      14  bar (_Complex z)
      15  {
      16    return v;
      17  }
      18  
      19  int
      20  baz (void)
      21  {
      22    int a, i;
      23    for (i = 0; i < 6; i++)
      24      foo (bar (1.0iF * i), &a);
      25    return 0;
      26  }
      27  
      28  int
      29  main ()
      30  {
      31    baz ();
      32    return 0;
      33  }