blob: 7f67f62dce67c811a6f01806ea1d9f6c6e1e888f [file] [log] [blame]
/* { dg-do compile } */
/* { dg-options "-O2 -w" } */
extern void sincos(double x, double *sinx, double *cosx);
void apply(void (*f)(double, double *, double *),
double x, double *sinx, double *cosx)
{
f(x, sinx, cosx);
return;
}
void apply_sincos(double x, double **sinx, double **cosx)
{
apply(sincos, x, sinx, cosx);
return;
}