From e1d7c2294075f5a59e276bb2dd7af79772443234 Mon Sep 17 00:00:00 2001
From: Jakob Kaivo <jkk@ung.org>
Date: Mon, 28 Mar 2022 16:33:35 -0400
Subject: rename biglog() to big_log()

---
 big.c    | 2 +-
 big.h    | 2 +-
 reduce.c | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/big.c b/big.c
index 3fc51ae..835706c 100644
--- a/big.c
+++ b/big.c
@@ -709,7 +709,7 @@ static double big__log(word x, double logbase, char *name, double (*fn)(double))
 }
 
 /* logarithm of big x */
-double biglog(word x)
+double big_log(word x)
 {
   static double logIBASE = 0.0;
   if (logIBASE == 0.0) {
diff --git a/big.h b/big.h
index ba94440..d13e3a9 100644
--- a/big.h
+++ b/big.h
@@ -25,7 +25,7 @@
 long long big_toll(word);
 word big_fromll(long long);
 double big_tod(word);
-double biglog(word);
+double big_log(word);
 double big_log10(word);
 int bigcmp(word,word);
 word big_divide(word, word);
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));
-- 
cgit v1.2.1