Build Fix -- compatibility issue with newer autoconf
[sxemacs] / src / ent / ent-indef.c
index e5ca291..e128ec4 100644 (file)
@@ -26,7 +26,7 @@ along with this program.  If not, see <http://www.gnu.org/licenses/>. */
 #include "lisp.h"
 #include "sysproc.h"    /* For qxe_getpid */
 
-#include "ent-indef.h"
+#include "ent.h"
 
 static inline int indef_eq(Lisp_Object, Lisp_Object);
 static inline int indef_neq(Lisp_Object, Lisp_Object);
@@ -46,7 +46,7 @@ Lisp_Object Vcomplex_infinity;
 
 \f
 static void
-indef_print (Lisp_Object obj, Lisp_Object printcharfun, int UNUSED(escapeflag))
+indef_print (Lisp_Object obj, Lisp_Object printcharfun, int SXE_UNUSED(escapeflag))
 {
        Bufbyte *istr = indef_to_string(XINDEF_DATA(obj));
        write_c_string((char*)istr, printcharfun);
@@ -56,18 +56,15 @@ indef_print (Lisp_Object obj, Lisp_Object printcharfun, int UNUSED(escapeflag))
 }
 
 static int
-indef_equal (Lisp_Object obj1, Lisp_Object obj2, int UNUSED(depth))
+indef_equal (Lisp_Object obj1, Lisp_Object obj2, int SXE_UNUSED(depth))
 {
        return (XINDEF_DATA(obj1) == XINDEF_DATA(obj2));
 }
 
 static unsigned long
-indef_hash (Lisp_Object obj, int depth)
+indef_hash (Lisp_Object obj, int SXE_UNUSED(depth))
 {
        return (unsigned long)XINDEF_DATA(obj);
-
-       /* less warnings */
-       if (depth);
 }
 
 static const struct lrecord_description indef_description[] = {
@@ -115,7 +112,7 @@ Bufbyte *indef_to_string(indef i)
 }
 
 static Lisp_Object
-ent_lift_indef(Lisp_Object number, ent_lift_args_t UNUSED(unused))
+ent_lift_indef(Lisp_Object number, ent_lift_args_t SXE_UNUSED(unused))
 {
        if (INFINITYP(number))
                return number;
@@ -126,7 +123,7 @@ ent_lift_indef(Lisp_Object number, ent_lift_args_t UNUSED(unused))
 }
 
 Lisp_Object
-ent_lift_INDEF_T_COMPARABLE(Lisp_Object number, ent_lift_args_t UNUSED(unused))
+ent_lift_INDEF_T_COMPARABLE(Lisp_Object number, ent_lift_args_t SXE_UNUSED(unused))
 {
        if (COMPARABLE_INDEF_P(number))
                return number;
@@ -332,7 +329,7 @@ indef_prod(Lisp_Object l, Lisp_Object r)
                return make_indef(NOT_A_NUMBER);
        }
 }
-static Lisp_Object 
+static Lisp_Object
 indef_div(Lisp_Object l, Lisp_Object r)
 {
        if (INDEFP(l) && INDEFP(r))
@@ -348,7 +345,7 @@ indef_div(Lisp_Object l, Lisp_Object r)
        } else if (COMPARABLEP(l) && INDEFP(r)) {
                if (!COMPARABLE_INDEF_P(r))
                        return r;
-               else 
+               else
                        return Qzero;
        } else if (INFINITYP(l) || INFINITYP(r)) {
                return make_indef(COMPLEX_INFINITY);