From c2e152be334f9e1272db737e2eb5056e67def8d0 Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Sat, 2 Aug 2014 13:31:18 -0700
Subject: [PATCH] Use the fdlibm asin, acos, and atan routines.

---
 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 df0bb8c80..ef1628b32 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)
-- 
GitLab