Sign in
gnu
/
gcc
/
e27771e5dcd8cf2cb757db6177a3485acd28b88f
/
.
/
gcc
/
testsuite
/
gcc.c-torture
/
compile
/
20070603-1.c
blob: 94e2baf138df64cb4c4d5ae6d1d4fb928b3c9344 [
file
] [
log
] [
blame
]
int
f
(
_Complex
double
*
a
,
unsigned
int
n
)
{
unsigned
int
i
;
for
(
i
=
0
;
i
<
n
;
i
++)
{
a
[
i
]
=
__real__ a
[
i
+
1
]
+
__real__ a
[
i
];
}
}