path: root/testsuite/tests/safeHaskell/safeLanguage/SafeLang08_A.c

double sinyy (double d) {
	double (*y)(double) = 0x0;
	return y(d);
}