diff options
| author | Joakim Verona <joakim@verona.se> | 2011-09-14 11:45:59 +0200 |
|---|---|---|
| committer | Joakim Verona <joakim@verona.se> | 2011-09-14 11:45:59 +0200 |
| commit | 8d07d23ecd32b9e9f07234313c2e712a8c42b524 (patch) | |
| tree | d5d925a00733d9a6d1f637b8f3dfdd40c33a2fe7 /src/floatfns.c | |
| parent | 8918dacdb34e848edcd894e32de5b7b4e2fa19ea (diff) | |
| parent | 46888499da0bb61ce47d339275d5a0c757a02eb2 (diff) | |
| download | emacs-8d07d23ecd32b9e9f07234313c2e712a8c42b524.tar.gz emacs-8d07d23ecd32b9e9f07234313c2e712a8c42b524.tar.bz2 emacs-8d07d23ecd32b9e9f07234313c2e712a8c42b524.zip | |
upstream
Diffstat (limited to 'src/floatfns.c')
| -rw-r--r-- | src/floatfns.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/floatfns.c b/src/floatfns.c index 81cf6bdb61f..2011b4d942d 100644 --- a/src/floatfns.c +++ b/src/floatfns.c @@ -71,7 +71,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ extern double logb (double); #endif /* not HPUX and HAVE_LOGB and no logb macro */ -#if defined(DOMAIN) && defined(SING) && defined(OVERFLOW) +#if defined (DOMAIN) && defined (SING) && defined (OVERFLOW) /* If those are defined, then this is probably a `matherr' machine. */ # ifndef HAVE_MATHERR # define HAVE_MATHERR @@ -519,7 +519,7 @@ DEFUN ("expt", Fexpt, Sexpt, 2, 2, 0, if (f1 == 0.0 && f2 == 0.0) f1 = 1.0; #ifdef FLOAT_CHECK_DOMAIN - else if ((f1 == 0.0 && f2 < 0.0) || (f1 < 0 && f2 != floor(f2))) + else if ((f1 == 0.0 && f2 < 0.0) || (f1 < 0 && f2 != floor (f2))) domain_error2 ("expt", arg1, arg2); #endif IN_FLOAT2 (f3 = pow (f1, f2), "expt", arg1, arg2); |