From 7adafd921406485dfea0fb8e9290f5ae7f8aa5e5 Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Fri, 1 Aug 2014 23:25:55 -0700
Subject: [PATCH] Use the fdlibm routines for exp and log.

---
 src/code/irrat.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/code/irrat.lisp b/src/code/irrat.lisp
index 8f2949027..df0bb8c80 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)
-- 
GitLab