1  /* { dg-do compile } */
       2  /* { dg-options "-O2 -w" } */
       3  
       4  extern void sincos(double x, double *sinx, double *cosx);
       5  void apply(void (*f)(double, double *, double *),
       6  	   double x, double *sinx, double *cosx)
       7  {
       8    f(x, sinx, cosx);
       9    return;
      10  }
      11  void apply_sincos(double x, double **sinx, double **cosx)
      12  {
      13    apply(sincos, x, sinx, cosx);
      14    return;
      15  }