Mercurial > hg > xemacs-beta

diff src/number.c @ 2001:cc5b615380f8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-04-08 15:23:07 by james] Various fixes to repair the C++ build.
author james
date Thu, 08 Apr 2004 15:23:09 +0000
parents ea0e08ca2c78
children a9cdbfb4716e
line wrap: on
line diff
--- a/src/number.c	Wed Apr 07 21:51:29 2004 +0000
+++ b/src/number.c	Thu Apr 08 15:23:09 2004 +0000
@@ -24,7 +24,7 @@
 #include <limits.h>
 #include "lisp.h"
 
-Lisp_Object Qintegerp, Qrationalp, Qfloatingp, Qrealp, Qnumberp;
+Lisp_Object Qrationalp, Qfloatingp, Qrealp;
 Lisp_Object Vdefault_float_precision;
 Fixnum Vmost_negative_fixnum, Vmost_positive_fixnum;
 static Lisp_Object Qunsupported_type;
@@ -707,11 +707,9 @@
 #endif
 
   /* Type predicates */
-  DEFSYMBOL (Qintegerp);
   DEFSYMBOL (Qrationalp);
   DEFSYMBOL (Qfloatingp);
   DEFSYMBOL (Qrealp);
-  DEFSYMBOL (Qnumberp);
 #ifndef HAVE_BIGNUM
   DEFSYMBOL (Qbignump);
 #endif
@@ -732,6 +730,7 @@
   DEFSUBR (Fnumerator);
   DEFSUBR (Fdenominator);
   DEFSUBR (Fbigfloatp);
+  DEFSUBR (Ffloatingp);
   DEFSUBR (Frealp);
   DEFSUBR (Fcanonicalize_number);
   DEFSUBR (Fcoerce_number);