From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 22 Nov 2015 18:19:13 +0000 (+0200)
Subject: Fix unoptimized builds
X-Git-Tag: emacs-25.0.90~696
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9f0d19f24cd455765123a378a5e2f3e505cbb5ac;p=emacs.git

Fix unoptimized builds

* src/lisp.h (XTYPE): Move before XSYMBOL, to fix unoptimized
builds.
---

diff --git a/src/lisp.h b/src/lisp.h
index 9af13a85557..4bf7f38af80 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -921,6 +921,14 @@ XFASTINT (Lisp_Object a)
   return n;
 }
 
+/* Extract A's type.  */
+INLINE enum Lisp_Type
+XTYPE (Lisp_Object a)
+{
+  EMACS_UINT i = XLI (a);
+  return USE_LSB_TAG ? i & ~VALMASK : i >> VALBITS;
+}
+
 /* Extract A's value as a symbol.  */
 INLINE struct Lisp_Symbol *
 XSYMBOL (Lisp_Object a)
@@ -931,14 +939,6 @@ XSYMBOL (Lisp_Object a)
   return p;
 }
 
-/* Extract A's type.  */
-INLINE enum Lisp_Type
-XTYPE (Lisp_Object a)
-{
-  EMACS_UINT i = XLI (a);
-  return USE_LSB_TAG ? i & ~VALMASK : i >> VALBITS;
-}
-
 /* Extract A's pointer value, assuming A's type is TYPE.  */
 INLINE void *
 XUNTAG (Lisp_Object a, int type)