aboutsummaryrefslogtreecommitdiff
path: root/sysdeps/i386/fpu/e_atanh.S
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/i386/fpu/e_atanh.S')
-rw-r--r--sysdeps/i386/fpu/e_atanh.S15
1 files changed, 14 insertions, 1 deletions
diff --git a/sysdeps/i386/fpu/e_atanh.S b/sysdeps/i386/fpu/e_atanh.S
index 231e96f57f..3cd0362459 100644
--- a/sysdeps/i386/fpu/e_atanh.S
+++ b/sysdeps/i386/fpu/e_atanh.S
@@ -1,5 +1,5 @@
/* ix87 specific implementation of arctanh function.
- Copyright (C) 1996 Free Software Foundation, Inc.
+ Copyright (C) 1996, 1999 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
@@ -50,6 +50,12 @@ ln2_2: .tfloat 0.3465735902799726547086160
ENTRY(__ieee754_atanh)
movl 8(%esp), %ecx
+ movl %ecx, %eax
+ andl $0x7fffffff, %eax
+ cmpl $0x7ff00000, %eax
+ jae 5f
+7:
+
#ifdef PIC
call 1f
1: popl %edx
@@ -98,4 +104,11 @@ ENTRY(__ieee754_atanh)
jecxz 3f
fchs // 0.5*ln2*ld((1+x)/(1-x))
3: ret
+
+ // x == NaN or ħInf
+5: ja 6f
+ cmpl $0, 4(%esp)
+ je 7b
+6: fldl 4(%esp)
+ ret
END(__ieee754_atanh)