1 files changed, 1 insertions, 1 deletions
diff --git a/reduce.c b/reduce.c
index e1eebf1..170d76f 100644
--- a/reduce.c
+++ b/reduce.c
@@ -1938,7 +1938,7 @@ L3: if(arg1==NIL)lexfail(lastarg);
 
     case READY(LOG_FN): /* log */
     UPLEFT;
-    if(tag[lastarg]==INT)setdbl(e,biglog(lastarg));
+    if(tag[lastarg]==INT)setdbl(e,big_log(lastarg));
     else { errno=0; /* to clear */
            fa=force_dbl(lastarg);
            setdbl(e,log(fa));