From 94b677a1178c2c36518dc8d84ce918965220be3c Mon Sep 17 00:00:00 2001 From: Jakob Kaivo Date: Mon, 28 Mar 2022 16:32:49 -0400 Subject: rename biglog10() to big_log10() --- 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 9ac3b5d..3fc51ae 100644 --- a/big.c +++ b/big.c @@ -720,7 +720,7 @@ double biglog(word x) } /* logarithm of big x */ -double biglog10(word x) +double big_log10(word x) { static double log10IBASE = 0.0; if (log10IBASE == 0.0) { diff --git a/big.h b/big.h index 6d494fa..ba94440 100644 --- a/big.h +++ b/big.h @@ -26,7 +26,7 @@ long long big_toll(word); word big_fromll(long long); double big_tod(word); double biglog(word); -double biglog10(word); +double big_log10(word); int bigcmp(word,word); word big_divide(word, word); word big_remainder(word,word); diff --git a/reduce.c b/reduce.c index 89ef941..e1eebf1 100644 --- a/reduce.c +++ b/reduce.c @@ -1947,7 +1947,7 @@ L3: if(arg1==NIL)lexfail(lastarg); case READY(LOG10_FN): /* log10 */ UPLEFT; - if(tag[lastarg]==INT)setdbl(e,biglog10(lastarg)); + if(tag[lastarg]==INT)setdbl(e,big_log10(lastarg)); else { errno=0; /* to clear */ fa=force_dbl(lastarg); setdbl(e,log10(fa)); -- cgit v1.2.1