mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-26 23:31:55 -08:00
Code Issues Projects Releases Wiki Activity

; * src/timefns.c: Fix typo in previous change.

Browse source
This commit is contained in:
Paul Eggert 2020-03-08 16:49:32 -07:00
parent 20d3d3a950
commit cf223dc928
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/timefns.c
View file

@ -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)
{