User: james Date: 05/02/18 22:56:14 Modified: xemacs/src ChangeLog number.c Log: Fix for #ifdef inside of a macro use, as reported by Ben Wing. See xemacs-patches message with ID <pssm3tjzzh.fsf(a)diannao.ittc.ku.edu&gt;. Revision Changes Path 1.792 +5 -0 XEmacs/xemacs/src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v retrieving revision 1.791 retrieving revision 1.792 diff -u -r1.791 -r1.792 --- ChangeLog 2005/02/18 06:30:53 1.791 +++ ChangeLog 2005/02/18 21:56:10 1.792 ＠＠ -1,3 +1,8 ＠＠ +2005-02-18 Jerry James <james(a)xemacs.org&gt; + + * number.c: Define USED_IF_BIGFLOAT. + * number.c (Fcoerce_number): Use it. + 2005-02-18 Stephen J. Turnbull <stephen(a)xemacs.org&gt; * XEmacs 21.5.19 "chives" is released. 1.15 +7 -7 XEmacs/xemacs/src/number.c Index: number.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/number.c,v retrieving revision 1.14 retrieving revision 1.15 diff -u -r1.14 -r1.15 --- number.c 2005/02/03 16:14:07 1.14 +++ number.c 2005/02/18 21:56:11 1.15 ＠＠ -24,6 +24,12 ＠＠ #include <limits.h> #include "lisp.h" +#ifdef HAVE_BIGFLOAT +#define USED_IF_BIGFLOAT(decl) decl +#else +#define USED_IF_BIGFLOAT(decl) UNUSED (decl) +#endif + Lisp_Object Qrationalp, Qfloatingp, Qrealp; Lisp_Object Vdefault_float_precision; Fixnum Vmost_negative_fixnum, Vmost_positive_fixnum; ＠＠ -678,13 +684,7 ＠＠ Note that some conversions lose information. No error is signaled in such cases; the information is silently lost. */ - (number, type, -#ifdef HAVE_BIGFLOAT - precision -#else - UNUSED (precision) -#endif - )) + (number, type, USED_IF_BIGFLOAT (precision))) { CHECK_SYMBOL (type); if (EQ (type, Qfixnum))