From: Paul Eggert Date: Mon, 7 Jan 2019 05:59:03 +0000 (-0800) Subject: Minor INFINITY/NAN cleanup X-Git-Tag: emacs-27.0.90~3862 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8acb88c5026cb11cbff466f53bef9d3e864879e7;p=emacs.git Minor INFINITY/NAN cleanup * src/lread.c (INFINITY): Use a more-portable way to specify this macro on non-C99 platforms that lack it. (NAN): Remove; unused. --- diff --git a/src/lread.c b/src/lread.c index 788e57b707f..02f7caadeda 100644 --- a/src/lread.c +++ b/src/lread.c @@ -46,10 +46,6 @@ along with GNU Emacs. If not, see . */ #ifdef MSDOS #include "msdos.h" -#if __DJGPP__ == 2 && __DJGPP_MINOR__ < 5 -# define INFINITY __builtin_inf() -# define NAN __builtin_nan("") -#endif #endif #ifdef HAVE_NS @@ -74,6 +70,9 @@ along with GNU Emacs. If not, see . */ #if IEEE_FLOATING_POINT # include +# ifndef INFINITY +# define INFINITY ((union ieee754_double) {.ieee = {.exponent = -1}}.d) +# endif #endif /* The objects or placeholders read with the #n=object form.