Mercurial > hg > CbC > CbC_gcc
annotate gcc/testsuite/gcc.dg/pr50017.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 /* PR debug/50017 */ |
2 /* { dg-do compile } */ | |
3 /* { dg-options "-O3 -fcompare-debug" } */ | |
4 /* { dg-xfail-if "" { powerpc-ibm-aix* } } */ | |
5 | |
6 struct S { int r, i; }; | |
7 | |
8 void | |
9 foo (struct S *x, int y) | |
10 { | |
11 int i; | |
12 for (i = 1; i < y; i++) | |
13 { | |
14 struct S a, b, c; | |
15 a = x[0]; | |
16 b = x[i]; | |
17 c.r = a.r * b.r - a.i * b.i; | |
18 c.i = a.r * b.i + a.i * b.r; | |
19 x[i] = c; | |
20 } | |
21 } |