diff --git a/src/compiler/float-tran.lisp b/src/compiler/float-tran.lisp index 2d8d829bc963bc3ed61b4adb718b18e88185d15f..39e960b66b479e0a67b11be6441f21df6115c551 100644 --- a/src/compiler/float-tran.lisp +++ b/src/compiler/float-tran.lisp @@ -716,7 +716,7 @@ (dolist (stuff '((exp %exp *) (log %log float) (sqrt %sqrt float) - (sin %asin float) + (sin %sin float) (cos %cos float) (tan %tan float) (asin %asin float)