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
2010-12-30 Kai Tietz <kai.tietz@onevision.com>
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gcc.target
/
i386
/
980312-1.c
1
/* { dg-do link } */
2
/* { dg-require-effective-target ilp32 } */
3
/* { dg-options "-O2 -march=pentiumpro" } */
4
5
extern __inline double
6
__expm1 (double __x)
7
{
8
double __temp;
9
__temp = 1.0;
10
return __temp;
11
}
12
extern __inline double
13
__sgn1 (double __x)
14
{
15
return __x >= 0.0 ? 1.0 : -1.0;
16
}
17
double
18
tanh (double __x)
19
{
20
return __expm1 (__x) * __sgn1 (-__x);
21
}
22
main ()
23
{
24
return tanh (3.45) != 0;
25
}