blob: 143ef63b0c9c0d9fac1e5d2b7a9004e27d07c602 [file] [log] [blame]
double
f(double x)
{
return x*x;
}
double
Int(double (*f)(double), double a)
{
return (*f)(a);
}
main()
{
if (Int(&f,2.0) != 4.0)
abort();
exit (0);
}