Sign in
gnu
/
gcc
/
ab810952eb7c061e37054ddd1dfe0aa033365131
/
.
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
930614-1.c
blob: 7b206344b3a5d118b05bfc45589a8cb75bbc8ffd [
file
] [
log
] [
blame
]
f
(
double
*
ty
)
{
*
ty
=
-
1.0
;
}
main
()
{
double
foo
[
6
];
double
tx
=
0.0
,
ty
,
d
;
f
(&
ty
);
if
(
ty
<
0
)
ty
=
-
ty
;
d
=
(
tx
>
ty
)
?
tx
:
ty
;
if
(
ty
!=
d
)
abort
();
exit
(
0
);
}