OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Fix PR 17408 and PR 17409.
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
930614-1.c
1
f (double *ty)
2
{
3
*ty = -1.0;
4
}
5
6
main ()
7
{
8
double foo[6];
9
double tx = 0.0, ty, d;
10
11
f (&ty);
12
13
if (ty < 0)
14
ty = -ty;
15
d = (tx > ty) ? tx : ty;
16
if (ty != d)
17
abort ();
18
exit (0);
19
}