X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Firrat.lisp;h=0f2b7a321a424d09d40a6c5efdbbe79e48209423;hb=b16ab6d8df8b236728b4097a989eb626ad278eff;hp=1a38ed99a6cafedc6f76de7fae6900dbf99cfd91;hpb=7fb597b585fc715537ea644f7d84440eca217ca1;p=sbcl.git

diff --git a/src/code/irrat.lisp b/src/code/irrat.lisp
index 1a38ed9..0f2b7a3 100644
--- a/src/code/irrat.lisp
+++ b/src/code/irrat.lisp
@@ -46,8 +46,11 @@
              `(defun ,name ,ll (,name ,@ll))))
   (def %atan2 (x y))
   (def %atan (x))
+  (def %tan (x))
   (def %tan-quick (x))
+  (def %cos (x))
   (def %cos-quick (x))
+  (def %sin (x))
   (def %sin-quick (x))
   (def %sqrt (x))
   (def %log (x))