blob: c70bc748a2290a2072c1fffeb1b6f72ee24e7826 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
/* Copyright (C) 2002 Free Software Foundation.
Ensure that fabs(x) < 0.0 optimization is working.
Written by Roger Sayle, 20th July 2002. */
extern void abort (void);
extern double fabs (double);
extern void link_error (void);
void
foo (double x)
{
double p, q;
p = fabs (x);
q = 0.0;
if (p < q)
link_error ();
}
int
main()
{
foo (1.0);
return 0;
}
#ifndef __OPTIMIZE__
void
link_error ()
{
abort ();
}
#endif
|
