diff --git a/src/code/irrat.lisp b/src/code/irrat.lisp index df0bb8c806c23f788f0393bf2282a22f73011706..ef1628b329dcdc59ba8bab8f9b959c191a85e3f1 100644 --- a/src/code/irrat.lisp +++ b/src/code/irrat.lisp @@ -67,10 +67,10 @@ (def-math-rtn ("fdlibm_sin" %sin) 1) (def-math-rtn ("fdlibm_cos" %cos) 1) (def-math-rtn ("fdlibm_tan" %tan) 1) -(def-math-rtn "atan" 1) +(def-math-rtn ("fdlibm_atan" %atan) 1) (def-math-rtn "atan2" 2) -(def-math-rtn "asin" 1) -(def-math-rtn "acos" 1) +(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)