Sign in
llvm
/
llvm-archive
/
f91d1660b4827134c7666ae9637f21a2741d183f
/
.
/
clang-tests
/
gcc-4_2-testsuite
/
src
/
gcc.c-torture
/
execute
/
921208-1.c
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
);
}