Mercurial > emacs
changeset 3407:d00aaf536bfd
[!FLOAT_CHECK_ERRNO] (IN_FLOAT): New definition.
(Flog): Fix argument of `log'.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 01 Jun 1993 20:29:48 +0000 |
| parents | 829998469d86 |
| children | 8ffb00332c5f |
| files | src/floatfns.c |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/floatfns.c Tue Jun 01 20:25:45 1993 +0000 +++ b/src/floatfns.c Tue Jun 01 20:29:48 1993 +0000 @@ -154,6 +154,7 @@ } \ } while (0) #else +#define IN_FLOAT(d, name, num) (in_float = 1, (d), in_float = 0) #define IN_FLOAT2(d, name, num, num2) (in_float = 1, (d), in_float = 0) #endif @@ -471,7 +472,7 @@ if (b == 10.0) IN_FLOAT2 (d = log10 (d), "log", arg, base); else - IN_FLOAT2 (d = log (arg) / log (b), "log", arg, base); + IN_FLOAT2 (d = log (d) / log (b), "log", arg, base); } return make_float (d); }