diff --git a/src/code/irrat.lisp b/src/code/irrat.lisp index 8f294902724d782c876c617e9e9ef7d0d58faf2a..df0bb8c806c23f788f0393bf2282a22f73011706 100644 --- a/src/code/irrat.lisp +++ b/src/code/irrat.lisp @@ -79,8 +79,8 @@ (def-math-rtn "atanh" 1) ;;; Exponential and Logarithmic. -(def-math-rtn "exp" 1) -(def-math-rtn "log" 1) +(def-math-rtn ("__ieee754_exp" %exp) 1) +(def-math-rtn ("__ieee754_log" %log) 1) (def-math-rtn "log10" 1) (def-math-rtn ("__ieee754_pow" %pow) 2)