From cf223dc928119bb544c3370ad59fe3e175a8236e Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Sun, 8 Mar 2020 16:49:32 -0700 Subject: [PATCH] ; * src/timefns.c: Fix typo in previous change. --- src/timefns.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/timefns.c b/src/timefns.c index 4079358fc5d..553daf6e6a9 100644 --- a/src/timefns.c +++ b/src/timefns.c @@ -616,7 +616,7 @@ frac_to_double (Lisp_Object numerator, Lisp_Object denominator) (N * FLT_RADIX**SCALE) / D [or, if SCALE is negative, N / (D * FLT_RADIX**-SCALE)] as a bignum, convert the bignum to double, then divide the double by FLT_RADIX**SCALE. First scale N - N (or scale D, if SCALE is negative) ... */ + (or scale D, if SCALE is negative) ... */ ptrdiff_t scale = ddig - ndig + DBL_MANT_DIG + 1; if (scale < 0) { -- 2.39.5