From efbeb89b14488c258f8f95e4f443460e428a2046 Mon Sep 17 00:00:00 2001 From: Raymond Toy <toy.raymond@gmail.com> Date: Sat, 2 Aug 2014 15:38:45 -0700 Subject: [PATCH] Use the fdlibm inverse hyperbolic functions. --- src/code/irrat.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/code/irrat.lisp b/src/code/irrat.lisp index 86c7d9ebe..4ea134e7c 100644 --- a/src/code/irrat.lisp +++ b/src/code/irrat.lisp @@ -74,9 +74,9 @@ (def-math-rtn ("__ieee754_sinh" %sinh) 1) (def-math-rtn ("__ieee754_cosh" %cosh) 1) (def-math-rtn ("fdlibm_tanh" %tanh) 1) -(def-math-rtn "asinh" 1) -(def-math-rtn "acosh" 1) -(def-math-rtn "atanh" 1) +(def-math-rtn ("fdlibm_asinh" %asinh) 1) +(def-math-rtn ("__ieee754_acosh" %acosh) 1) +(def-math-rtn ("__ieee754_atanh" %atanh) 1) ;;; Exponential and Logarithmic. (def-math-rtn ("__ieee754_exp" %exp) 1) -- GitLab