gcc/testsuite/gcc.dg/20001009-1.c

   1 /* { dg-do compile } */
   2 /* { dg-options "-O2 -fpic" } */
   3 /* { dg-warning "not supported" "PIC unsupported" { target cris-*-elf* cris-*-aout* mmix-*-* } 0 } */
   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 }