summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.c-torture/compile/991213-1.c
blob: 4803d13915f063d66ad6305b6f26d298b4f15592 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
typedef __complex__ double double_complex;



void
p (const double_complex *t, int n)
{
  int i;
  double s = ({ typeof ( t[n/2] ) arg = ( t[n/2] ); (__imag__ arg); }) ;
  for (i = 1; i < n/2; i++)
    s += 2* ({ typeof ( t[i] ) arg = ( t[i] ); (__imag__ arg); }) ;
}