summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.c-torture/execute/930614-1.c
blob: 7b206344b3a5d118b05bfc45589a8cb75bbc8ffd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
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);
}