summaryrefslogtreecommitdiff
path: root/sysdeps/libm-i387/s_asinhl.S
diff options
context:
space:
mode:
Diffstat (limited to 'sysdeps/libm-i387/s_asinhl.S')
-rw-r--r--sysdeps/libm-i387/s_asinhl.S6
1 files changed, 5 insertions, 1 deletions
diff --git a/sysdeps/libm-i387/s_asinhl.S b/sysdeps/libm-i387/s_asinhl.S
index e112244908..f764381aab 100644
--- a/sysdeps/libm-i387/s_asinhl.S
+++ b/sysdeps/libm-i387/s_asinhl.S
@@ -1,5 +1,5 @@
/* ix87 specific implementation of arcsinh.
- Copyright (C) 1996 Free Software Foundation, Inc.
+ Copyright (C) 1996, 1997 Free Software Foundation, Inc.
This file is part of the GNU C Library.
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
@@ -58,8 +58,12 @@ ENTRY(__asinhl)
andl $0x8000, %ecx
xorl %ecx, 12(%esp)
fldt 4(%esp) // |x|
+ movl %eax, %edx
cmpl $0x3fde, %eax
jb 2f // |x| < 2^-34
+ orl $0xffff8000, %edx
+ incl %edx
+ jz 4f // x in ħInf or NaN
fldln2 // log(2) : |x|
cmpl $0x4020, %eax
fxch // |x| : log(2)