1  /* { dg-do compile { target fpic } } */
       2  /* { dg-options "-O2 -fpic" } */
       3  /* { dg-skip-if "too many arguments in function call" { bpf-*-* } } */
       4  
       5  extern void foo (void *a, double x, double y);
       6  void
       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])
       8  {
       9    double l, m, n, o, p;
      10    double q, r, s, t, u;
      11    double x, y, v, w;
      12    double z = 0.5 * j;
      13    double aa;
      14    l = b - 3 * d;
      15    m = 4 * f;
      16    n = f - h;
      17    q = c + 3 * g - i;
      18    r = 2 * (e - 2 * g + i);
      19    s = g - i;
      20    if (l != 0.0)
      21      {
      22        aa = 0.0;
      23        o = (- m + aa);
      24        p = (- m - aa);
      25        if (o > 0.0)
      26          {
      27            x = ((b-h)*o + 3*(d+h)*o + 3*(f-h)*o);
      28            y = ((c-i)*o + 3*(e+i)*o + 3*(g-i)*o);
      29            foo (a, z, w);
      30            foo (a, -z, w);
      31          }
      32        if (p > 0.0)
      33          {
      34            x = ((b+3*f-h)*p + 3*(d-2*f+h)*p + 3*p);
      35            y = ((c+3*g-i)*p + 3*(e-2*g+i)*p + 3*p);
      36            v = x * k[0] + y * k[2];
      37            w = x * k[1] + y * k[3];
      38            foo (a, z, w);
      39            foo (a, - z, w);
      40          }
      41      }
      42    if (q != 0.0)
      43      {
      44        aa = 0.0;
      45        t = (- r + aa) / (2 * q);
      46        u = (- r - aa) / (2 * q);
      47      }
      48  }