repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
* gcc.dg/const-elim-1.c: xfail for xtensa.
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.dg
/
980312-1.c
blob
8f72c31d341f7859aed266ddb94a0d7179a70771
1
/* { dg-do link { target i?86-*-* } } */
2
/* { dg-options "-O2 -march=pentiumpro" } */
3
4
extern
__inline
double
5
__expm1
(
double
__x
)
6
{
7
double
__temp
;
8
__temp
=
1.0
;
9
return
__temp
;
10
}
11
extern
__inline
double
12
__sgn1
(
double
__x
)
13
{
14
return
__x
>=
0.0
?
1.0
: -
1.0
;
15
}
16
double
17
tanh
(
double
__x
)
18
{
19
return
__expm1
(
__x
) *
__sgn1
(-
__x
);
20
}
21
main
()
22
{
23
return
tanh
(
3.45
) !=
0
;
24
}