annotate gcc/testsuite/gcc.dg/20001009-1.c @ 145:1830386684a0

gcc-9.2.0
author anatofuz
date Thu, 13 Feb 2020 11:34:05 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* { dg-do compile { target fpic } } */
kono
parents:
diff changeset
2 /* { dg-options "-O2 -fpic" } */
145
1830386684a0 gcc-9.2.0
anatofuz
parents: 111
diff changeset
3 /* { dg-skip-if "too many arguments in function call" { bpf-*-* } } */
111
kono
parents:
diff changeset
4
kono
parents:
diff changeset
5 extern void foo (void *a, double x, double y);
kono
parents:
diff changeset
6 void
kono
parents:
diff changeset
7 bar (void *a, double b, double c, double d, double e, double f, double g, double h, double i, double j, double k[6])
kono
parents:
diff changeset
8 {
kono
parents:
diff changeset
9 double l, m, n, o, p;
kono
parents:
diff changeset
10 double q, r, s, t, u;
kono
parents:
diff changeset
11 double x, y, v, w;
kono
parents:
diff changeset
12 double z = 0.5 * j;
kono
parents:
diff changeset
13 double aa;
kono
parents:
diff changeset
14 l = b - 3 * d;
kono
parents:
diff changeset
15 m = 4 * f;
kono
parents:
diff changeset
16 n = f - h;
kono
parents:
diff changeset
17 q = c + 3 * g - i;
kono
parents:
diff changeset
18 r = 2 * (e - 2 * g + i);
kono
parents:
diff changeset
19 s = g - i;
kono
parents:
diff changeset
20 if (l != 0.0)
kono
parents:
diff changeset
21 {
kono
parents:
diff changeset
22 aa = 0.0;
kono
parents:
diff changeset
23 o = (- m + aa);
kono
parents:
diff changeset
24 p = (- m - aa);
kono
parents:
diff changeset
25 if (o > 0.0)
kono
parents:
diff changeset
26 {
kono
parents:
diff changeset
27 x = ((b-h)*o + 3*(d+h)*o + 3*(f-h)*o);
kono
parents:
diff changeset
28 y = ((c-i)*o + 3*(e+i)*o + 3*(g-i)*o);
kono
parents:
diff changeset
29 foo (a, z, w);
kono
parents:
diff changeset
30 foo (a, -z, w);
kono
parents:
diff changeset
31 }
kono
parents:
diff changeset
32 if (p > 0.0)
kono
parents:
diff changeset
33 {
kono
parents:
diff changeset
34 x = ((b+3*f-h)*p + 3*(d-2*f+h)*p + 3*p);
kono
parents:
diff changeset
35 y = ((c+3*g-i)*p + 3*(e-2*g+i)*p + 3*p);
kono
parents:
diff changeset
36 v = x * k[0] + y * k[2];
kono
parents:
diff changeset
37 w = x * k[1] + y * k[3];
kono
parents:
diff changeset
38 foo (a, z, w);
kono
parents:
diff changeset
39 foo (a, - z, w);
kono
parents:
diff changeset
40 }
kono
parents:
diff changeset
41 }
kono
parents:
diff changeset
42 if (q != 0.0)
kono
parents:
diff changeset
43 {
kono
parents:
diff changeset
44 aa = 0.0;
kono
parents:
diff changeset
45 t = (- r + aa) / (2 * q);
kono
parents:
diff changeset
46 u = (- r - aa) / (2 * q);
kono
parents:
diff changeset
47 }
kono
parents:
diff changeset
48 }