Mercurial > hg > CbC > CbC_gcc
annotate gcc/testsuite/gcc.c-torture/compile/991213-1.c @ 158:494b0b89df80 default tip
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 18:13:55 +0900 |
parents | 04ced10e8804 |
children |
rev | line source |
---|---|
111 | 1 typedef __complex__ double double_complex; |
2 | |
3 | |
4 | |
5 void | |
6 p (const double_complex *t, int n) | |
7 { | |
8 int i; | |
9 double s = ({ typeof ( t[n/2] ) arg = ( t[n/2] ); (__imag__ arg); }) ; | |
10 for (i = 1; i < n/2; i++) | |
11 s += 2* ({ typeof ( t[i] ) arg = ( t[i] ); (__imag__ arg); }) ; | |
12 } | |
13 |