diff --git a/src/code/irrat.lisp b/src/code/irrat.lisp index ef1628b329dcdc59ba8bab8f9b959c191a85e3f1..86c7d9ebe282897d31aebd66d502610645b39ebe 100644 --- a/src/code/irrat.lisp +++ b/src/code/irrat.lisp @@ -71,9 +71,9 @@ (def-math-rtn "atan2" 2) (def-math-rtn ("__ieee754_asin" %asin) 1) (def-math-rtn ("__ieee754_acos" %acos) 1) -(def-math-rtn "sinh" 1) -(def-math-rtn "cosh" 1) -(def-math-rtn "tanh" 1) +(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)