diff options
| author | Mark H Weaver <mhw@netris.org> | 2019-04-17 07:32:23 -0400 |
|---|---|---|
| committer | Mark H Weaver <mhw@netris.org> | 2019-05-07 04:37:52 -0400 |
| commit | 16b4bac35510216f2cc28f12fc0a5afbf42c6223 (patch) | |
| tree | 6e6bbbe3f240a90001ba8a01c5799e28c88c0809 /libguile | |
| parent | 2a1f22c00abc7b11f4fc5b77933151306e535cbb (diff) | |
Fix typo in comment.
Diffstat (limited to 'libguile')
| -rw-r--r-- | libguile/numbers.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c index 1a04cca43..31fdee47a 100644 --- a/libguile/numbers.c +++ b/libguile/numbers.c @@ -586,7 +586,7 @@ scm_i_divide2double (SCM n, SCM d) mpz_mul_2exp (hi, lo, 1); /* Adjust e as needed to satisfy the inequality lo <= x < hi, - (but without making e less then the minimum exponent) */ + (but without making e less than the minimum exponent) */ while (mpz_cmp (x, lo) < 0 && e > DBL_MIN_EXP - DBL_MANT_DIG) { mpz_mul_2exp (x, x, 1); |